tests/testthat/test-asToplineCategoricalArray.R

In Crunch-io/crunchtabs: Custom Report Generation for Crunch Datasets

context("as.ToplineCategoricalArray")
test_that("Stop condition", {
  expect_error(
    as.ToplineCategoricalArray(
      questions = list("a", "b", "c"),
      labels = c(letters[1:4])
    ),
    "Number of labels provided does not"
  )
})