tests/testthat/test-get_data_sectors.R

data_test_sectors <- sectors_data

test_that("Expected column names", {
  expect_equal(
    colnames(data_test_sectors), 
    c("Date", "Sector", "Return"))
})
p0bs/shiny.moduler documentation built on Oct. 21, 2023, 9:24 p.m.