## ----setup, include = FALSE----------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
library(dplyr)
library(tidyr)
library(week4)
## ------------------------------------------------------------------------
dat <- fars_read(make_filename(2013))
## ------------------------------------------------------------------------
fars_read_years(c(2013, 2014))
## ------------------------------------------------------------------------
fars_summarize_years(c(2013, 2014))
## ------------------------------------------------------------------------
fars_map_state (20, 2013)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.