# #——包括= FALSE - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -库(BiocStyle) # # - - - - - eval = FALSE - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - #如果!requireNamespace (“BiocManager”,悄悄地= TRUE)) # install.packages (BiocManager) # BiocManager::安装(“scDblFinder”) # # #,或者获得最新进展:# BiocManager::安装(“身为/ scDblFinder”) # #——警告= FALSE - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - set.seed(123)图书馆(scDblFinder) #我们创建一个虚拟数据集;因为它是小我们设定一个更高的紧身上衣率sce < - mockDoubletSCE (ngen dbl.rate = 0.1, = 300) #我们运行scDblFinder南加州爱迪生公司(提供异常高的紧身上衣率)< - scDblFinder (sce、dbr = 0.1) # # - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -表(真理美元= sce类型,调用= sce scDblFinder.class美元)# # - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -南加州爱迪生公司< - scDblFinder (sce、集群=“集群”)表(真理美元= sce类型,调用= sce scDblFinder.class美元)# # - - - - - eval = FALSE - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - #库(BiocParallel) # sce < - scDblFinder (sce、样品=“sample_id”, BPPARAM = MulticoreParam(3))表(sce scDblFinder.class美元)# # # - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - sessionInfo ()