R/utils_distance_between_coordinates.R

Defines functions distanceBetweenCoordinates

#' @import geosphere
distanceBetweenCoordinates = function(lon1, lat1, lon2, lat2) {
  result = distm(c(lon1, lat1), c(lon2,lat2))[[1]]
  ifelse(is.na(result), 0, result)
}
filpro/vessel_challenge documentation built on March 17, 2021, 4:53 p.m.