haversineDistance <- function(lat1, lon1, lat2, lon2, unitless = FALSE) {
.Call("C_haversineDistance", lat1, lon1, lat2, lon2, unitless, PACKAGE = packageName)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.