探秘R语言中的调色艺术——RColorBrewer调色板
- 看不见的线
- 2253
- 2024-03-19 17:14:55
- 原创
R语言是科研绘图中常用的工具,决定一个图表是否美观,除了数据本身外很大程度上还取决于配色是否合适,今天我们为大家介绍R语言中强大的调色工具——RColorBrewer调色板。
什么是RColorBrewer?
RColorBrewer是R语言中的一个优秀的调色工具包,它提供了一系列精心设计的调色板,帮助我们在数据可视化过程中选择合适的颜色方案,使得图表更具可读性和美感。
特色功能:
丰富的调色板选择: RColorBrewer中包含了多种调色板,涵盖了不同颜色的组合,适用于各种图表类型和主题。
离散与连续色彩:无论是需要在分类数据上使用离散色彩还是在数值数据上使用连续色彩,RColorBrewer都能满足你的需求。
色盲友好:调色板的设计考虑了颜色盲的情况,确保图表在不同观众中都能传递清晰的信息。
如何使用RColorBrewer?
#安装并加载RColorBrewer包
install.packages("RColorBrewer")
library(RColorBrewer)
#查看所有配色方案
display.brewer.all()

#查看 brewer.pal.info数据框
#该数据框介绍了包中色卡的名称,每个色卡可以设置的颜色种类极限,色卡的类型,及该色卡是否对色盲友好
brewer.pal.info
调色板名称 | 颜色数 (maxcolors) | 调色板分类 (category) | 对色盲是否友好 (colorblind) |
BrBG | 11 | div | TRUE |
PiYG | 11 | div | TRUE |
PRGn | 11 | div | TRUE |
PuOr | 11 | div | TRUE |
RdBu | 11 | div | TRUE |
RdGy | 11 | div | FALSE |
RdYlBu | 11 | div | TRUE |
RdYlGn | 11 | div | FALSE |
Spectral | 11 | div | FALSE |
Accent | 8 | qual | FALSE |
Dark2 | 8 | qual | TRUE |
Paired | 12 | qual | TRUE |
Pastel1 | 9 | qual | FALSE |
Pastel2 | 8 | qual | FALSE |
Set1 | 9 | qual | FALSE |
Set2 | 8 | qual | TRUE |
Set3 | 12 | qual | FALSE |
Blues | 9 | seq | TRUE |
BuGn | 9 | seq | TRUE |
BuPu | 9 | seq | TRUE |
GnBu | 9 | seq | TRUE |
Greens | 9 | seq | TRUE |
Greys | 9 | seq | TRUE |
Oranges | 9 | seq | TRUE |
OrRd | 9 | seq | TRUE |
PuBu | 9 | seq | TRUE |
PuBuGn | 9 | seq | TRUE |
PuRd | 9 | seq | TRUE |
Purples | 9 | seq | TRUE |
RdPu | 9 | seq | TRUE |
Reds | 9 | seq | TRUE |
YlGn | 9 | seq | TRUE |
YlGnBu | 9 | seq | TRUE |
YlOrBr | 9 | seq | TRUE |
YlOrRd | 9 | seq | TRUE |
#从数据框中可以看到,RColorBrewer提供了3类调色板。
#第一类,div,两端暗,中间亮,适合展示极端数值,可以用以下语句单独查看:
display.brewer.all(type = 'div')

#第二类,qual,分类颜色,适合表示分类变量,可以用以下语句单独查看:
display.brewer.all(type = 'qual')

#第三类,seq,连续渐变,适合表示连续变量,可以用以下语句单独查看:
display.brewer.all(type = 'seq')

#实战演练
#加载R包
library(ggplot2)
library(RColorBrewer)
#生成模拟数据
set.seed(1)#设置随机种子,以确保结果可重现
data <- data.frame(
Group = paste("Group", 1:6), #组别名称
Value = rnorm(6, mean = 10, sd = 2) #随机生成6个符合正态分布的数值
)
head(data)

#绘制柱状图
#默认配色
p1 <- ggplot(data,aes(x=Group,y=Value))+
geom_bar(aes(fill=Group),stat = "identity")
p1

#调用调色板配色
# 1、从“Dark2”调色板中连续取 6个颜色
colors <- brewer.pal(6, 'Dark2')
colors
p2 <- ggplot(data,aes(x=Group,y=Value))+
geom_bar(aes(fill=Group),stat = "identity")+
scale_fill_manual(values = colors)
p2

# 2、直接指定调色板名称,以调色板“Set2”为例
p3 <- ggplot(data,aes(x=Group,y=Value))+
geom_bar(aes(fill=Group),stat = "identity")+
scale_fill_brewer(palette = "Set2")
p3

参考资料:
https://cran.r-project.org/web/packages/RColorBrewer/RColorBrewer.pdf
推荐课程
【课程】微生物比较基因组精品系列课——全套自学必入的系统课程
课程链接:微生物比较基因组精品系列课【全套】
【课程】铜绿假单胞菌基因组研究和分子分型实战
课程链接:铜绿假单胞菌基因组研究和分子分型实战
【课程】微生物比较基因组与群体进化——基因组变异专题研究
课程链接:微生物比较基因组与群体进化
【课程】微生物分子分型-MLST课程——分型全套(含理论、软件、方法)
课程链接:微生物分子分型-MLST课程
【课程】基因组结构分析神器Easyfig实操精品课
【课程】BRIG绘图——结构比较专题2
【课程】肺炎克雷伯菌基因组学研究综合指南
课程链接:肺炎克雷伯菌基因组学研究综合指南
【课程】微生物基因组生信必学课程
课程链接:微生物基因组生信分析必学课程
【课程】微生物生防菌研究
课程链接:生防菌的系统化研究
专题材料
【资料】耐药专题材料
【资料】生防专题材料
请添加唯那生物技术客服小唯的微信号winnerbio01,备注“耐药专题”或“生防专题”,立马获取。
更多专题推荐
1、生信技能课专辑
2、耐药毒力专题
3、肺炎克雷伯菌专题
4、密码子偏好性专题
7、软件脚本分享
9、知识干货
10、分泌系统
11、软件下载
12、书籍下载
-
点赞 (0人)
- 收藏 (0人)