# **************** 调色盘~~~~
library(RColorBrewer)
cor <- c(brewer.pal(8, "Dark2"),brewer.pal(12, "Paired"),brewer.pal(8, "Set2"),brewer.pal(9, "Set1"))
+scale_color_manual(values=cor)
#查看色板描述。
brewer.pal.info
DimPlot(obj , group.by = 'cts',cols = cor,label = TRUE)
https://www.jianshu.com/p/c42b6b7bc92f
网友评论