test_that("is_try_error works", {
x <- attempt(log("a"), silent = TRUE)
expect_true(is_try_error(x))
x <- attempt(log(10), silent = TRUE)
expect_false(is_try_error(x))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.