tests/testthat/test-global_utils.R

test_that("Get Telraam Segments (as defined by default)", {
  suppressWarnings(create_config(overwrite = TRUE))
  expect_type(get_segments(),'list')
  expect_equal(names(get_segments()),c('segment-01','segment-02'))
  expect_type(get_segments()$'segment-01','character')
})

Try the telraamStats package in your browser

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

telraamStats documentation built on May 29, 2024, 10:08 a.m.