有些时候，换个配色就能让你的图片上一档次。我准备在这篇文章中整理出一些好看的配色方案。
virids 调色盘
安装和加载
install.packages("viridis")
library(viridis)
官方教程的测试代码
library(ggplot2)
ggplot(data.frame(x = rnorm(10000), y = rnorm(10000)), aes(x = x, y = y)) +
geom_hex() + coord_fixed() +
scale_fill_viridis() + theme_bw()
蜂窝
个人感觉这包特别适合展示热图, 我们以pheatmap为例进行比较
test <- matrix(rnorm(200), 20, 10)
test[1:10, seq(1, 10, 2)] = test[1:10, seq(1, 10, 2)] + 3
test[11:20, seq(2, 10, 2)] = test[11:20, seq(2, 10, 2)] + 2
test[15:20, seq(2, 10, 2)] = test[15:20, seq(2, 10, 2)] + 4
colnames(test) = paste("Test", 1:10, sep = "")
rownames(test) = paste("Gene", 1:20, sep = "")
# Draw heatmaps
pheatmap(test)
# viridis
pheatmap(test, color = viridis(7))
pheatmap默认输出
viridis调色板
viridis这个包一共有如下这几种配色，感觉还是很好看的。
配色
参考资料: https://cran.r-project.org/web/packages/viridis/vignettes/intro-to-viridis.html
未完待续....
