tests/testthat/test1.R

library("Cousera4")

filename<-make_filename(2013)
test_that("filename is character string", {
  expect_is(filename, "character")
})
ulicheva/Coursera4 documentation built on May 3, 2019, 2:24 p.m.