tests/testthat/test_expand_choice.R

library(odkr)
context("Test expended data frame output")

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

test_that("Output is a data.frame", {
  expect_is(test, "data.frame")
})

Try the odkr package in your browser

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

odkr documentation built on Feb. 11, 2018, 3:10 p.m.