tests/testthat/test_gvizPlot.R

test_that("Check class of gvizPlot", {
 myOGRE <- makeExampleOGREDataSet()
 myOGRE <- loadAnnotations(myOGRE)
 myOGRE <- fOverlaps(myOGRE)
 myOGRE <- gvizPlot(myOGRE,query="ENSG00000142168")
 expect_equal(class(myOGRE),class(GRangesList()))
})
svenbioinf/OGRE documentation built on Jan. 30, 2023, 10:55 p.m.