tests/testthat/test-get_data_indicators.R

data_test_indicators <- shiny.moduler:::get_data_indicators()

test_that("Expected column names", {
  expect_equal(
    colnames(data_test_indicators), 
    c("date", "series", "level")
    )
})
p0bs/shiny.moduler documentation built on Oct. 21, 2023, 9:24 p.m.