tests/testthat/test.R

test_that("errors if bad parameters", {
    library(ExperimentHub)
    hub <- ExperimentHub()
    myfiles <- query(hub, "FlowSorted.CordBloodCombined.450k")
    expect_false(myfiles$ah_id!="EH2256")
})
immunomethylomics/FlowSorted.CordBloodCombined.450k documentation built on Jan. 23, 2022, 5:50 p.m.