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")
})
ernestguevarra/odkr documentation built on Oct. 13, 2024, 10:23 a.m.