test_that("get_interventions_data works as expected", {
d <- get_interventions_data()
expect_is(d, "data.frame")
expect_is(d$date_implemented, "Date")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.