R/make_filename.R

In a7n7k7a7/farsData: FARS Data Explorator

#' Create filename for Fatality Analysis Reporting System data
#' 
#' This is a helper hunction to create a filename including a year of the dataset.
#'
#' @param year A year of the dataset
#'
#' @return Function returns a character string with filename including year of the dataset.
#' 
#' @examples
#' make_filename(2017)
#' 
#' @export
make_filename <- function(year) {
  year <- as.integer(year)
  sprintf("accident_%d.csv.bz2", year)
}