tests/testthat/test-eurobarometer_special_values.R

special_values <- eurobarometer_special_values()

test_that("correct structure and values are returned", {
  expect_equal(as.character(special_values[1,1:2]),
               c("inap", "99999"))
})
antaldaniel/eurobarometer documentation built on Aug. 31, 2020, 10:57 p.m.