tests/testthat/test-bdc_create_dir.R

## skip("dont run")
skip_on_cran()
skip_on_ci()

bdc_create_dir()

test_that("bdc dir exists", {
  expect_true(dir.exists(here::here("Output/Check")))
  expect_true(dir.exists(here::here("Output/Intermediate")))
  expect_true(dir.exists(here::here("Output/Report")))
  expect_true(dir.exists(here::here("Output/Figures")))

  unlink(here::here("Output"), recursive = TRUE)
})

Try the bdc package in your browser

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

bdc documentation built on Jan. 25, 2026, 1:06 a.m.