tests/testthat/test-example.R

test_that("all example basenames listed", {
  skip_non_utf8()
  p <- srt_example()
  expect_length(p, 1)
  expect_type(p, "character")
})

Try the srt package in your browser

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

srt documentation built on Sept. 5, 2021, 5:28 p.m.