library(greatcircle)
context("Distance functions")
test_that("find distance between two points on the Earth", {
expect_equal(great_circle_distance(-34, 18, 41, -74), 12567, tolerance=.1)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.