library(locDist)
context("Calculate distance")
test_that("distance between points", {
expect_equal(great_circle_distance(-34,18,41,-74), 12557, tolerance = .1)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.