R语言绘图与统计教程：一行代码绘制堆积和并列条形图并添加误差线_R语言技巧_统计与绘图_实用技巧

今天来学习给并列条形图和堆积条形图添加误差线。

1. 加载数据

使用ggpubr包绘制图形，ToothGrowth数据集进行演示。

library(ggpubr) # 加载包
data("ToothGrowth")

数据集包含了研究维生素C对60只豚鼠牙齿生长len影响的实验结果。

每只动物通过两种给药方法supp（分为VC或QC）中的一种，接受三种剂量水平dose的维生素C（0.5、1和2mg/天）。

2. 绘制堆积条形图

绘制堆积条形图，并添加误差线。

代码很简单。

ggbarplot(ToothGrowth, 
          x = "dose", y = "len",
          fill= "supp", 
          add = "mean_sd")

3. 图形稍美化下

可以添加标签并设置标签的美学属性，也可以通过add.params参数设置误差线的美学属性。

ggbarplot(ToothGrowth, x = "dose", y = "len",
          fill= "supp", palette = "lancet", # 添加调色板
          add = "mean_sd", # 添加误差线
          add.params = list(width = 0.2), # 调整误差项的上下两端的宽度
          label = TRUE, lab.col = "white", # 添加数据标签，设置标签颜色
          lab.size = 5, lab.vjust = 2.0, # 设置标签大小和调整位置
          position = position_stack(0.8))

0 (1).png

4. 绘制并列条形图

添加position = position_dodge(0.8)可以绘制并列条形图。

ggbarplot(ToothGrowth, x = "dose", y = "len",
          fill= "supp", 
          add = "mean_sd",
          position = position_dodge(0.8))

0 (2).png

5. 图片稍美化下

可以添加标签并设置标签的美学属性，也可以通过add.params参数设置误差线的美学属性。

ggbarplot(ToothGrowth, x = "dose", y = "len",
          fill= "supp", palette = "lancet",
          add = "mean_sd",
          add.params = list(width = 0.2),
          label = TRUE, lab.col = "white", # 添加数据标签，设置标签颜色
          lab.size = 5, lab.vjust = 5.6,
          position = position_dodge(0.8))

0 (3).png

参考资料

ggpubr帮助文件