tests/testthat/test-lunEstimate.R

context("lunEstimate")

library(scater)
set.seed(1)
counts <- counts(mockSCE())

test_that("lunEstimate works", {
    params <- lunEstimate(counts)
    expect_true(validObject(params))
})

Try the splatter package in your browser

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

splatter documentation built on Dec. 3, 2020, 2:01 a.m.