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])
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.