context("test-ic_datetime.R")
# test_that("multiplication works", {
# expect_equal(2 * 2, 4)
# })
test_that("ic_datetime works for 20180809T160000Z:", {
expect_equal(
class(ic_datetime("20180809T160000Z")), class(Sys.time())
)
})
test_that("ic_datetime is NA for empty:", {
expect_output(ic_datetime(""), NA)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.