tests/testthat/test_getRsd.R

test_that("getRsd", {
	A <- matrix(rnorm(10*60), nrow=10)

	expect_more_than(getRsd(A), 0)
	expect_equal(length(getRsd(A, onlyReturnMedian=FALSE)), 60)
})

Try the rcellminer package in your browser

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

rcellminer documentation built on Nov. 26, 2020, 2:02 a.m.