haversine {hans}

Calculate the haversine distance in kilometers given lat/lon pairs

Description

Calculate the haversine distance in kilometers given lat/lon pairs

Usage

haversine(lat1, lon1, lat2, lon2)

Arguments

lat1

A vector of latitudes

lon1

A vector of longitudes

lat2

A vector of latitudes

lon2

A vector of longitudes

Value

a vector of distances in kilometers

Examples

# simple haversine calculation 
lon1 <- runif(-160, -60, n = 10e6)
lat1 <- runif(40, 60, n = 10e6)
lon2 <- runif(-160, -60, n = 10e6)
lat2 <- runif(40, 60, n = 10e6)
df <- data.frame(lat1, lon1, lat2, lon2)
df$havers <- haversine(df$lat1, df$lon1, df$lat2, df$lon2)