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 Aug. 25, 2024, 5:28 a.m.