test_that("source_all works", {
if(!is_32bit()){
source_all(path = "../../R")
testthat::expect_true(exists("messager"))
testthat::expect_true("dplyr" %in% .packages())
} else {
testthat::expect_null(NULL)
}
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.