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