tests/testthat/test-data.R

context("scRNAseq")

test_that("Cell cycle gene data OK", {
	expect_equal(length(cc.genes), 97)

	expect_equal(length(g2m.genes.orig), 200)
})

test_that("CD genes data OK", {
	expect_equal(nrow(cdGenes), 394)
})
bimberlabinternal/OOSAP documentation built on Jan. 19, 2021, 2:47 a.m.