rf <- system.file("extdata", "sst.tif", package = "vapour", mustWork = TRUE)
test_that("raw data works", {
expect_equal(2 * 2, 4)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.