context("Testing if continent is Asia")
test_that("Continent is Asia",
{
x <- 'Asia'
expect_identical(x, 'Asia')
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.