1、加上多线程,加快数据处理速度
library(future)
# check the current active plan
plan()
plan("multisession", workers = 9)
plan()
# 有了多线程加上,FindAllMarkers 速度就很快
sce.markers <- FindAllMarkers(object = sce, only.pos = TRUE,
min.pct = 0.25,
thresh.use = 0.25)
# 交互式数据表
DT::datatable(sce.markers)