tests/testthat/testdatabestand.R

test_that("filename is conform standard", {
  x <- make_filename(2013)
  expect_that(x, equals("data/accident_2013.csv.bz2"))
})
FerrieHeskes/Deel3-week2 documentation built on May 16, 2019, 10:04 a.m.