library(pacman)
p_load(Seurat, ggplot2, RColorBrewer)
ggplot(obj@meta.data, aes(orig.ident, fill=celltype)) + geom_bar(position='fill') + labs(x='', y='fraction of cells') + theme_test() + scale_fill_manual(values=brewer.pal(11,'Paired'))
library(pacman)
p_load(Seurat, ggplot2, RColorBrewer)
ggplot(obj@meta.data, aes(orig.ident, fill=celltype)) + geom_bar(position='fill') + labs(x='', y='fraction of cells') + theme_test() + scale_fill_manual(values=brewer.pal(11,'Paired'))
本文标题:ggplot2 | 三两下画个漂亮的细胞比例图
本文链接:https://www.haomeiwen.com/subject/qmsqjjtx.html
网友评论