tests/testthat/test_utils.R

test_that(".validateWindow", {
    expect_error(.validateWindow(3, 10L), "integer")
    expect_error(.validateWindow(3L:4L, 10L), "length")
    expect_error(.validateWindow(-1L, 10L), "larger")
    expect_error(.validateWindow(11L, 10L), "smaller")
    expect_true(.validateWindow(3L, 10L))
})

Try the MsCoreUtils package in your browser

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

MsCoreUtils documentation built on Nov. 8, 2020, 10:59 p.m.