tests/testthat/test-ISRaD.report.R

test_that("ISRaD.report", {
  # Errors on bad database
  expect_error(ISRaD.report(1, "xxx"))

  # Errors on unknown report
  x <- database <- ISRaD::Gaudinski_2001
  expect_error(ISRaD.report(x, "xxx"), regexp = "Unknown report type")
})

Try the ISRaD package in your browser

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

ISRaD documentation built on Sept. 21, 2023, 9:06 a.m.