tests/testthat/test-check_outfile.R

test_that("check_outfile", {
  outfile = tempfile()
  expect_equal(check_outfile(outfile = outfile, retimg = TRUE), outfile)

  expect_type(check_outfile(outfile = NULL, retimg = TRUE), "character")

  expect_error(check_outfile(outfile = NULL, retimg = FALSE))
  
})

Try the neurobase package in your browser

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

neurobase documentation built on Oct. 23, 2022, 5:05 p.m.