密度图plot_density

pdf("plot_density.pdf",width = 4.5, height = 4)
d1 <- Nebulosa::plot_density(seurat_scRNA, 
                             features = c("Cd3d", "Fbp1"),
                             size = 1.2, 
                             # pal = "magma",
                             joint=TRUE, slot = "data",combine = T,
                             reduction = "umap")[[3]]
print(d1)
dev.off()

ggplot2 要3.4低版本的

library(scCustomize)
pdf("plot_density.pdf",width = 4, height = 4)
Plot_Density_Joint_Only(seurat_object = marsh_mouse_micro, features = c("Egfr","Lrp1","Cd81","Ptprf"))
dev.off()
最后编辑于 ：
©著作权归作者所有,转载或内容合作请联系作者
平台声明：文章内容（如有图片或视频亦包括在内）由作者上传并发布，文章内容仅代表作者本人观点，简书系信息发布平台，仅提供信息存储服务。