ggplot2添加errorbar

要在ggplot2中添加误差线，可以使用geom_errorbar函数。

首先需要准备数据，其中包含要绘制的x轴、y轴和误差范围。例如：

library(ggplot2)

# 准备数据
df <- data.frame(
  x = c(1, 2, 3, 4, 5),
  y = c(1.2, 2.5, 3.1, 4.2, 5.3),
  ymin = c(0.8, 2.1, 2.8, 3.8, 4.9),
  ymax = c(1.6, 3.0, 3.4, 4.6, 5.8)
)

然后可以使用ggplot函数创建一个基本的散点图：

# 创建散点图
p <- ggplot(df, aes(x, y))
p + geom_point()

接下来，可以使用geom_errorbar添加误差线。需要指定ymin和ymax作为误差范围，并使用width参数控制误差线的宽度。

# 添加误差线
p + geom_point() + geom_errorbar(aes(ymin = ymin, ymax = ymax), width = 0.2)

完整的代码如下：

library(ggplot2)

# 准备数据
df <- data.frame(
  x = c(1, 2, 3, 4, 5),
  y = c(1.2, 2.5, 3.1, 4.2, 5.3),
  ymin = c(0.8, 2.1, 2.8, 3.8, 4.9),
  ymax = c(1.6, 3.0, 3.4, 4.6, 5.8)
)

# 创建散点图
p <- ggplot(df, aes(x, y))
p + geom_point()

# 添加误差线
p + geom_point() + geom_errorbar(aes(ymin = ymin, ymax = ymax), width = 0.2)