This is a package for analysing U.S. National Highway Traffic Safety Administration's Fatality Analysis Reporting System (FARS) data. The built-in functions provide loading the data, summarizing it and plotting.
library(fars)
make_filename <- function(year) { year <- as.integer(year) sprintf("accident_%d.csv.bz2", year) }
make_filename(2013)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.