inst/tests/test-as.R

context("as")

test_that("as integer date", {
  x <- -1:3
  expect_identical(date2integer(integer2date(x)), x)
  expect_identical(integer2date(1L), as.Date("2000-01-01"))
})
poissonconsulting/datalist documentation built on Feb. 18, 2021, 10:24 p.m.