vignettes/fars.R

In EnriquePH/FARS: Read Fatality Analysis Reporting System (FARS) data

## ------------------------------------------------------------------------
library(fars)
library(maps)

## ------------------------------------------------------------------------
list.files(system.file("extdata", package = "fars"))

## ------------------------------------------------------------------------
yr <- 2015
make_filename(yr)

## ------------------------------------------------------------------------
fars_read_years(2013)

## ------------------------------------------------------------------------
plot(fars_summarize_years(2015))
fars_summarize_years(c(2015, 2014))

## ------------------------------------------------------------------------
state_num <- 49 # Utah
yr <- 2014
fars_map_state(state_num, yr)