library(testthat)
library(fars)
test_that("erroneous file name", {
expect_that(fars_read("accident_2012.csv.bz2"), throws_error())
})
test_that("throwing error", {
expect_that(fars_map_state(2, 2013), throws_error())
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.