具有多个标记的geom_vline()的密度图，作为ggplot中的均值

geom_vline() 是 ggplot2 包中的一个函数，用于在图形中添加垂直线。当你在密度图中使用多个标记的 geom_vline() 来表示均值时，你可以在图中直观地看到数据的集中趋势。

基础概念

密度图：显示数据分布的图表，通常是连续变量的概率密度函数的估计。
geom_vline()：在 ggplot2 中添加垂直线的几何对象。
均值：所有数据点的平均值，是衡量中心趋势的一个指标。

优势

直观展示数据的平均值，帮助观察者快速理解数据的中心位置。
可以通过不同的颜色或样式区分多个均值，适用于比较不同组或条件下的均值。

类型

单个均值：只有一条垂直线表示整体数据的均值。
多个均值：多条垂直线分别表示不同子集或条件下的均值。

应用场景

数据分析报告中，用于突出显示关键指标的平均水平。
在进行假设检验或模型评估时，用来对比预测值与实际值的均值差异。

示例代码

以下是一个使用 ggplot2 创建带有两个均值标记的密度图的 R 代码示例：

# 加载必要的库
library(ggplot2)

# 生成示例数据
set.seed(123)
data <- data.frame(value = c(rnorm(100, mean = 5), rnorm(100, mean = 10)),
                   group = rep(c("A", "B"), each = 100))

# 计算每组的均值
means <- aggregate(value ~ group, data, mean)

# 创建密度图
p <- ggplot(data, aes(x = value, fill = group)) +
  geom_density(alpha = 0.5) +
  geom_vline(data = means, aes(xintercept = value, color = group),
             linetype = "dashed", size = 1) +
  scale_fill_manual(values = c("blue", "red")) +
  scale_color_manual(values = c("blue", "red")) +
  labs(title = "Density Plot with Mean Values",
       x = "Value",
       y = "Density")

# 显示图形
print(p)