context("topics")
test_that("fails well with no input", {
skip_on_cran()
expect_error(topic(), "argument \"id\" is missing")
})
test_that("fails well with non-existent page", {
skip_on_cran()
expect_error(topic("asfafsfadfasdfd"))
})
test_that("curl options work", {
skip_on_cran()
expect_error(topic("asdfadf", timeout_ms = 1))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.