tests/testthat/test_make_filename.R

filename <- make_filename(2015)
expect_that(filename, is_identical_to("accident_2015.csv.bz2"))
kurowska/fars documentation built on May 20, 2019, 7:06 p.m.