This function uses the Haversine forumula for calculating great circle distances between points. This formula is purpoted to work better than the spherical law of cosines for very short distances.
distance(targetLon, targetLat, longitude, latitude)
targetLon | longitude (decimal degrees) of the point from which distances are calculated |
---|---|
targetLat | latitude (decimal degrees) of the point from which distances are calculated |
longitude | vector of longitudes for which a distance is calculated |
latitude | vector of latitudes for which a distance is calculated |
Vector of distances in km.
# Seattle to Portland airports SEA_lon <- -122.3088 SEA_lat <- 47.4502 PDX_lon <- -122.5951 PDX_lat <- 45.5898 distance(SEA_lon, SEA_lat, PDX_lon, PDX_lat)#> [1] 208.2562