## ---- twoal() ----------------------------------------------------------------
test_that("twoal()", {
x <- twoal()
expect_identical(is.list(x), TRUE)
})
## ---- twoep() ----------------------------------------------------------------
test_that("twoep()", {
x <- twoep()
expect_identical(is.list(x), TRUE)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.