tests/testthat/test-calc_zoom.R

context("calc_zoom")

test_that("calc_zoom example works", {
  zoom <- calc_zoom(
    c(-94, -95),
    c(56, 57)
  )
  expect_equal(zoom, 10)
})
dkahle/ggmap documentation built on March 3, 2024, 8:19 a.m.