Plot SCIntRuler

PlotSCIR(fullcluster, seuratlist, testres, legendtitle = NULL, title = NULL)

Arguments

fullcluster

A list of clusters that generated by the function GetCluster.

seuratlist

A list of Seurat objects, usually can be got by SplitObject().

testres

Result from function PermTest()

legendtitle

Title of legend, default to be NULL

title

Title of figure, default to be NULL

Value

A ggplot2 object

Examples

# Create example data for fullcluster (mock data)
data(sim_data_sce)
data(sim_result)
# if(is(sim_data_sce, "SingleCellExperiment")){ sim_data <- as.Seurat(sim_data_sce) }
sim_data <- SCEtoSeurat(sim_data_sce)
#> Error in SCEtoSeurat(sim_data_sce): could not find function "SCEtoSeurat"
seuratlist <- Seurat::SplitObject(sim_data, split.by = "Study")
#> Error in eval(expr, envir, enclos): object 'sim_data' not found
# fullcluster <- GetCluster(seurat_object_list)
# testres <- PermTest(fullcluster,distmat,15)
PlotSCIR(sim_result[[1]], seuratlist, sim_result[[4]])
#> Error in eval(expr, envir, enclos): object 'seuratlist' not found