tests/testthat/test-import.R

DF <- read_inst("inst/test-imported_data")
test_that("descriptive data transformation preserves original data", {
  out <- get_descriptive_binaries(DF)
  expect_true(is.data.frame(out))
  expect_true(does_info_match(DF, out))
})
mandel94/easyAnalysis documentation built on Jan. 2, 2022, 9:52 a.m.