knitr::opts_chunk$set( collapse = TRUE, comment = "#>" ) library(FARS)
First we will take a look at the 2013 data by reading it in using the fars_read function. Once the data is loaded in as a data frame, go ahead and inspect it.
#file_path <- system.file("data","accident_2013.csv",package="FARS") #data_2013 <- fars_read(file_path) data(data_2013) head(data_2013) class(data_2013)
"He who gives up [code] safety for [code] speed deserves neither." (via)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.