tests/testthat/test-year.R

test_that("year() works", {

  x <- CY(2011:2012)

  expect_identical(
    year(x),
    as.character(c(2011L, 2012L)))

})
BAAQMD/yeartools documentation built on April 1, 2022, 12:24 a.m.