context('rcr')
test_that('too many PMIDs throws an error', {
# max is currenty 1000
fake <- 1:1001
expect_error(rcr(fake))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.