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)
})

Try the cqcr package in your browser

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

cqcr documentation built on Oct. 7, 2019, 5:06 p.m.