tests/testthat/test-county_complete.R

context("test-county_complete")

test_that("rows and columns match expected dimensions", {
  expect_equal(nrow(county_complete), 3142)
  expect_equal(ncol(county_complete), 188)
})

test_that("column names are lower case", {
  expect_identical(names(county_complete), tolower(names(county_complete)))
})

Try the usdata package in your browser

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

usdata documentation built on June 22, 2021, 1:06 a.m.