tests/testthat/test_changeTime_basic.R

library(BigginsTime)

context("Time")

test_that("Adding one hour", {
  time <- as.Time(1000)
  expect_equal(change.Time(time, 1), time + 3600)
})
sarotter/BigginsTime documentation built on May 29, 2019, 2 p.m.