tests/testthat/test-rcr.r

context('rcr')

test_that('too many PMIDs throws an error', {
  # max is currenty 1000
  fake <- 1:1001
  expect_error(rcr(fake))
})
jayhesselberth/nihexporter documentation built on May 17, 2023, 6:42 p.m.