# \donttest{
cells <- colnames(pbmc.mtx)
el <- gsdensity::compute.nn.edges(coembed = ce, nn.use = 300)
cv <- gsdensity::run.rwr(el = el,
gene_set = gene.set.list[["GOBP_B_CELL_ACTIVATION"]],
cells = cells)
cl <- compute.cell.label(cv)
# }
Run the code above in your browser using DataLab