我最近尝试在R中的ggplot中创建一个条形图，并在其中添加误差线。然而，当我查找geom_errorbar时，唯一有记录的方法似乎是创建另一个数据框来保存每个条形图的ymin和ymax，并使用stat ='identity'属性绘制条形图，这似乎非常麻烦。
例如，这是geom_errorbar帮助页面中出现的示例：

df <- data.frame(
  trt = factor(c(1, 1, 2, 2)),
  resp = c(1, 5, 3, 4),
  group = factor(c(1, 2, 1, 2)),
  se = c(0.1, 0.3, 0.3, 0.2)
)
df2 <- df[c(1,3),]

# Define the top and bottom of the errorbars
limits <- aes(ymax = resp + se, ymin=resp - se)

p <- ggplot(df, aes(fill=group, y=resp, x=trt))
p + geom_bar(position="dodge", stat="identity")

# Because the bars and errorbars have different widths
# we need to specify how wide the objects we are dodging are
dodge <- position_dodge(width=0.9)
p + geom_bar(position=dodge) + geom_errorbar(limits, position=dodge, width=0.25)

有没有更好的方法来做到这一点，而不必使用stat='identity' plotting？