R语言使用ggplot2绘图时如何添加额外水平线（如变量均值线）

解答 #

你提供的代码可以实现添加均值水平线的需求，不过有更简洁、符合ggplot2设计逻辑的实现方案。

你写的第二段代码逻辑是通顺的：y = mean(var2)会对所有x坐标点返回同一个均值常量，geom_line会将这些y值相同的点连接为水平线，运行不会报错，也能得到预期效果。

更推荐的实现方式 #

ggplot2提供了专门的geom_hline()图层用于绘制水平线，不需要额外绑定x和group参数，可读性更强，还可以灵活自定义样式：

library(ggplot2)

ggplot(work) + 
  geom_line(aes(x = var1, y = var2, group = 1, color = "原始数据")) +
  # 绘制均值水平线，可自定义线型、粗细、颜色
  geom_hline(aes(yintercept = mean(var2, na.rm = TRUE), color = "var2均值"), 
             linetype = "dashed", linewidth = 1) +
  theme(axis.text.x = element_text(angle = 90)) +
  ggtitle("Sample graph") +
  # 可选：手动指定两条线的展示颜色
  scale_color_manual(values = c("原始数据" = "black", "var2均值" = "red")) +
  labs(color = "系列")

注意事项 #

• 如果var2列存在缺失值，需要在mean()函数中添加na.rm = TRUE参数，否则均值计算会返回NA，无法生成水平线。
• 使用geom_hline的方案比额外新增geom_line的冗余度更低，后续修改样式或者调整逻辑也更方便。

内容的提问来源于stack exchange，提问作者stats_noob