tests/testthat/test_detectionP.R

context("detectionP")
test_that("test='detectionP' gives correct errors", {
    sdf <- sesameDataGet("EPIC.1.SigDF")
    expect_is(pOOBAH(sdf), "SigDF")
})
zwdzwd/sesame documentation built on Jan. 8, 2025, 4:50 a.m.