Revision 5dbc7ef13680d99c0990cf5b8a8ba867aeab9ada authored by Alexey Sergushichev on 14 June 2022, 18:30:35 UTC, committed by Alexey Sergushichev on 14 June 2022, 18:30:35 UTC
1 parent 80dee83
testcreateES.R
context("Create ExpressionSet")
library(Biobase)
test_that("createES finishes with result", {
load(file = system.file("testdata/GSE27112-GPL6103.rda", package="phantasus"))
expect_is(createES(data = exprs(es), pData = pData(es),
fData = fData(es),
eData = list(name="", lab="", contact="", title="", url="", other=list(), pubMedIds=""),
varLabels = varLabels(es),
fvarLabels = fvarLabels(es)), "ExpressionSet")
})
Computing file changes ...