tests/testthat/test-teardown/test-teardown.R

local_edition(2)
setup(brio::write_lines("test", "teardown.txt"))
teardown(file.remove("teardown.txt"))

test_that("file is created", {
  expect_true(file.exists("teardown.txt"))
})

Try the testthat package in your browser

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

testthat documentation built on Oct. 6, 2023, 5:10 p.m.