tests/testthat/test-vec_c.R

test_that("vec_c works", {
  x <- vec_c(RY(2011), RY(2012))
  expect_is(x, c("YYYY", "character"))
  expect_equal(timeline(x), "RY")
  expect_equivalent(x, RY(2011, 2012))
})
BAAQMD/yeartools documentation built on April 1, 2022, 12:24 a.m.