tests/testthat/test_expand_choice.R

test <- expandMultChoice(answers = renameODK(sampleData2)$ws7,
                         naCode = NA)

test_that("Output is a data.frame", {
  expect_s3_class(test, "data.frame")
})
validmeasures/odkr documentation built on Oct. 16, 2024, 3:55 p.m.