tests/testthat/test-phenoEstimate.R

context("phenoEstimate")

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

test_that("phenoEstimate works", {
    skip_if_not_installed("phenopath")
    params <- phenoEstimate(counts)
    expect_true(validObject(params))
})
Oshlack/splatter documentation built on April 1, 2024, 9:37 a.m.