tests/testthat/test_great_circle_distance.R

library(Circle)

context("Circle")

test_that("circle distance", {
  expect_equal(great_circle_distance(-34, 18, 41, -74), 12557, tolerance = 5)
})
katiesocolow/Circle documentation built on May 4, 2019, 1:21 p.m.