tests/testthat/test_fars.R

context("Testing Make Filename Function")

filename <- make_filename(2013)
test_that("The function to create a filename works",{
  expect_that(filename, is_a("character"))
})
larkinj/Submission documentation built on Dec. 21, 2021, 8:50 a.m.