tests/testthat/test-tor_example.R

In tor: Import Multiple Files From a Single Directory at Once

context("tor_example")

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()))
  )
})