tests/testthat/test-make_filename.R

context("make_filename")

test_that("make_filename returns the expected value", {
  yr <- "2013"
  out <- "accident_2013.csv.bz2"
  expect_equal(make_filename(yr), out)
})
csgbloom/farspackage documentation built on May 20, 2020, 10:15 a.m.