tests/testthat/test-get_teow.R

test_that(".get_teow works", {
  skip_on_cran()

  gteow <- get_teow()
  expect_silent(.check_resource_fun(gteow))
  fps <- gteow()
  expect_silent(.check_footprints(fps))
  expect_equal(fps$filename, "wwf_terr_ecos.gpkg")
})

Try the mapme.biodiversity package in your browser

Any scripts or data that you put into this service are public.

mapme.biodiversity documentation built on June 8, 2025, 1:42 p.m.