tests/testthat/test-PlotPattern.R

context("Test: PlotPattern() ")

data(PhyloExpressionSetExample)
data(DivergenceExpressionSetExample)

nonStandardExpressionSet <- PhyloExpressionSetExample[, 2:9]

test_that("is.ExpressionSet() throughs error when no ExpressionSet is entered to PlotPattern()",
          {
                  expect_error(
                          PlotPattern(nonStandardExpressionSet)
                  )
          })

Try the myTAI package in your browser

Any scripts or data that you put into this service are public.

myTAI documentation built on May 23, 2018, 5:03 p.m.