tests/testthat/test-imd_wales_lad.R

test_that("correct number of rows", {
  expect_equal(nrow(imd_wales_lad), 22)
})

test_that("Welsh LADs", {
  expect_equal(unique(substr(imd_wales_lad$lad_code, 1, 1)), "W")
})

Try the IMD package in your browser

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

IMD documentation built on Sept. 30, 2022, 5:06 p.m.