Revision 25214e052b7b7b35a20ce546f2b2cd9f009960ba authored by Alexey Sergushichev on 11 December 2018, 21:48:19 UTC, committed by Alexey Sergushichev on 11 December 2018, 21:48:19 UTC
1 parent 75cb225
Raw File
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")
})
back to top