test_that("read years", { k <- make_filename(2014) expect_match(k, "2014") expect_is(k, "character") })
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.