tests/testthat/test-scSEGIndex.R

context("Testing scSEGIndex function")
## Loading example data
data('example_sce', package = 'scMerge')
## subsetting genes to illustrate usage.
exprs_mat = SummarizedExperiment::assay(example_sce, 'logcounts')[1:110, 1:20]
set.seed(1)
scSEGIndex(exprs_mat = exprs_mat)
scSEGIndex(exprs_mat = exprs_mat, cell_type = example_sce$cellTypes[1:20])
SydneyBioX/scMerge documentation built on April 14, 2024, 3:22 a.m.