# This example is run using a fake expression matrix.
# Therefore, the output will be meaningless.
############# Fake expression matrix #############
set.seed(123)
exprMatrix <- matrix(data=sample(c(rep(0, 5000), sample(1:3, 5000, replace=TRUE))),
nrow=20,
dimnames=list(paste("Gene", 1:20, sep=""),
paste("Cell", 1:500, sep="")))
##################################################
cells_rankings <- AUCell_buildRankings(exprMatrix, plotStats=TRUE)
cells_rankings
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.