tests/testthat/test-brf_level_shift.R

test_that("brf_level_shift works", {
  
  expect_equal(nlevels(set_level_shift(1:100, c(2, 40, 86))), 4L)
  
})
jkennel/waterlevel documentation built on Dec. 1, 2019, 6:24 p.m.