#Test make_filename to ensure that numeric and character years produce proper
#filenames.
expect_that(make_filename(2013),equals("accident_2013.csv.bz2"))
expect_that(make_filename("2013"),equals("accident_2013.csv.bz2"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.