test_that("day 1", {
x <- example_data_01()
expect_equal(f01_count_increases(x), 7)
expect_equal(f01_count_shingled_increases(x), 5)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.