test_that("check_suggests works", {
expect_null(check_suggests("base"))
pkg <- "dkjgrndfkjgndlkfsjgndlskjfnglkdjfng"
msg <- sprintf("Suggested package '%s' not present", pkg)
expect_error(check_suggests(pkg))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.