tests/testthat/test-bfs_get_catalog_geodata.R

test_that("bfs_get_catalog_geodata() works", {
  df_geodata <- bfs_get_catalog_geodata(include_metadata = FALSE)
  expect_s3_class(df_geodata, "data.frame")
  expect_gt(nrow(df_geodata), 1)
})

Try the BFS package in your browser

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

BFS documentation built on Sept. 20, 2023, 5:07 p.m.