tests/testthat/test-providers.R

test_that("big providers works", {
  skip_on_cran()

  prov1 <- cqc_providers(local_authority = "Tower Hamlets")

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