tests/testthat/test_last_update.R

context("test csb_last_update")

# test output ------------------------

result <- csb_last_update()

test_that("Returns Character", {
  expect_equal("character" %in% class(result), TRUE)
})

Try the stlcsb package in your browser

Any scripts or data that you put into this service are public.

stlcsb documentation built on May 2, 2019, 4 a.m.