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 July 3, 2024, 7:23 p.m.