Nothing
R/ComputeDistance.R
In VTrack: A Collection of Tools for the Analysis of Remote Acoustic Telemetry Data
ComputeDistance <-
function(Lat1, Lat2, Lon1, Lon2)
{
rads <- 180 / pi
gd <- 6371 * acos(sin(Lat1 / rads) * sin(Lat2 / rads) + cos(Lat1 / rads) * cos(Lat2 / rads) * cos((Lon1 - Lon2) / rads))
return(gd)
}
Try the VTrack package in your browser
Any scripts or data that you put into this service are public.
VTrack documentation built on May 2, 2019, 9:16 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
ComputeDistance <-
function(Lat1, Lat2, Lon1, Lon2)
{
rads <- 180 / pi
gd <- 6371 * acos(sin(Lat1 / rads) * sin(Lat2 / rads) + cos(Lat1 / rads) * cos(Lat2 / rads) * cos((Lon1 - Lon2) / rads))
return(gd)
}
Try the VTrack package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.