testthat::context("Testing foobar")
setwd(here::here("")) # workspace is reset per file
testthat::test_that("foobar()", {
testthat::expect_true(T);
print("haha, I'm not skipped")
})
testthat::test_that("foobar()", {
testthat::expect_true(T);
"Nice, I can use %>% " %>% print()
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.