tests/testthat/test-define_interval.R

test_that("multiplication works", {
  timeID <- c(1,1,3,4,5,6,7)
  expect_equal(define_interval(timeID, 3, 3),
               c(1,2,3))
})

Try the spotoroo package in your browser

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

spotoroo documentation built on Aug. 21, 2023, 9:10 a.m.