test_that("File name exists", {
file_name <<- make_filename("2014")
expect_that( file_name, is_a("character"))
expect_that(fars_read(), throws_error())
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.