R语言 箱线图标注平均值

在R语言中，你可以使用`geom_boxplot()`函数绘制箱线图，并使用`geom_hline()`函数标注平均值。以下是一个示例代码：

library(ggplot2)

# 创建一个数据框
data <- data.frame(Group = rep(c("A", "B", "C"), each = 20),
                   Value = c(rnorm(20, mean = 10), rnorm(20, mean = 15), rnorm(20, mean = 12)))

# 绘制箱线图
p <- ggplot(data, aes(x = Group, y = Value)) +
  geom_boxplot()

# 计算平均值
mean_values <- aggregate(Value ~ Group, data, mean)

# 添加平均值标注
p <- p + geom_hline(data = mean_values, aes(yintercept = Value, color = Group),
                    linetype = "dashed", size = 1) +
  geom_text(data = mean_values, aes(y = Value + 1, label = round(Value, 2)), vjust = -0.5)

# 显示图形
print(p)

这段代码会生成一个箱线图，并使用虚线和标签标注每个组的平均值。你可以根据自己的数据和需求进行相应的调整。