tests/testthat/test-flatten_query.R

context("flatten_query")

test_that("flatten_query works", {
  expect_equal(
    flatten_query(list(statsDataId = "0003103532", cdCat01 = c("010800130", "010800140"))),
    list(statsDataId = "0003103532", cdCat01 = "010800130,010800140")
  )
})

Try the estatapi package in your browser

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

estatapi documentation built on April 14, 2020, 7:12 p.m.