第一个
在邮箱看到了苹果的广告邮件，这个HomePod mini是啥产品不太清楚，音响吗？这个不管了，啥产品自己也买不起 哈哈哈，第一眼见到感觉配色确实很好看，如果应用到我们的科研数据可视化里应该也不错
image.png
把颜色摘下来做个柱形图看看
library(ggplot2)
df<-data.frame(x=LETTERS[1:5],
y=c(1,2,3,2,1))
colors<-c("#c6c7c9","#264a5f","#d15034",
"#f1ae2d","#0c0d0f")
ggplot(data = df,aes(x=x,y=y))+
geom_col(aes(fill=x),
show.legend = F)+
scale_fill_manual(values = colors)+
theme_minimal()+
scale_y_continuous(expand = c(0,0))
image.png
看起来还不错
第二套
来源于一篇Nature Communications的论文，公众号后台有读者留言
image.png
image.png
我找到原文看了一下，没有找到原始数据和代码，所以复现还是有难度的。但是这个配色确实很好看，我们可以把配色摘下来自己用
还是摘下配色做一个简单的柱形图
colors2<-c("#ea5a49","#b16ba8","#5a72b5",
"#7caf2a","#f39426")
df<-data.frame(x=LETTERS[1:5],
y=5)
ggplot(data = df,aes(x=x,y=y))+
geom_col(aes(fill=x),
show.legend = F)+
scale_fill_manual(values = colors2)+
theme_minimal()+
scale_y_continuous(expand = c(0,0))
image.png
欢迎大家关注我的公众号
小明的数据分析笔记本
小明的数据分析笔记本 公众号 主要分享：1、R语言和python做数据分析和数据可视化的简单小例子；2、园艺植物相关转录组学、基因组学、群体遗传学文献阅读笔记；3、生物信息学入门学习资料及自己的学习笔记！
