tests/testthat/test-inspection_area.R

test_that("inspection_area works", {
  skip_on_cran()

  insp1 <- cqc_inspection_areas()

  expect_length(insp1, 7)
  expect_true(tibble::is_tibble(insp1))
})
evanodell/cqcr documentation built on April 24, 2023, 12:40 a.m.