https://github.com/ctlab/phantasus
Tip revision: 7a7752866743aa5a893aab2b3cdf2dcb066c99c3 authored by Alexey Sergushichev on 11 May 2018, 11:53:02 UTC
Depending on svglite
Depending on svglite
Tip revision: 7a77528
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),
varLabels = varLabels(es),
fvarLabels = fvarLabels(es)), "ExpressionSet")
})
