tests/testthat/test_zi_load_crosswalk.R

context("test zi_load_crosswalk function")

# test errors ------------------------------------------------

test_that("incorrectly specified parameters trigger appropriate errors", {
  expect_error(zi_load_crosswalk(zip_source = "ham", year = 2022),
               "The 'zip_source' value provided is invalid. Please input either 'UDS' or 'HUD'.")

})

Try the zippeR package in your browser

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

zippeR documentation built on Sept. 11, 2024, 8:56 p.m.