tests/testthat/test_getUnixTime.R

context("getUnixTime")

test_that("getUnixTime", {
  x = getUnixTime()
  expect_true(is.integer(x) && length(x) == 1 && !is.na(x))
})

Try the BBmisc package in your browser

Any scripts or data that you put into this service are public.

BBmisc documentation built on Sept. 29, 2022, 5:12 p.m.