tests/testthat/test-PlotDistribution.R

context("Test: PlotDistribution() ")

data(PhyloExpressionSetExample)
data(DivergenceExpressionSetExample)

nonStandardExpressionSet <- PhyloExpressionSetExample[, 2:9]

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

Try the myTAI package in your browser

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

myTAI documentation built on Feb. 24, 2021, 9:06 a.m.