tests/testthat/test-tor_example.R

test_that("with no argument returns directories at inst/extdata (not a path)", {
  expect_false(
    any(grepl("tor", tor_example()))
  )
})

test_that("with a known directory returns a path (includes the package name)", {
  expect_true(
    any(grepl("tor", tor_example("csv")))
  )
})

test_that("includes known directory", {
  expect_true(
    any(grepl("rdata", tor_example()))
  )
})
maurolepore/tor documentation built on July 17, 2024, 12:03 a.m.