为多个类别绘制“误差线”

Question

我有一个数据框，其中包含不同类别的 (min,max) 值，例如：

    case1     case2
 1 0.8945 0.8943867
 2 0.8950 0.8952849

我想绘制一个图，其中对于每个类别，只绘制一个在底部和顶部带有短水平线段的垂直线段：它看起来像一个误差线，但它没有中心点.不过，如果有必要，我可以忍受中心点。每个段都必须标有相应的类别名称，作为箱线图的框：

boxplot(df,cex.axis=1.5)

但条形的外观一定是plotCI、segments等函数的样子：

require(plotrix)
x=0:1
plotCI(x,apply(df,2,mean),li=df[1,],ui=df[2,],xlab="categories",ylab="values")

这看起来不错，但是 x 轴是数字的，而我需要 x 轴上的类别名称。另外，我不喜欢这些条彼此相距如此之远，而与情节边缘如此接近。是否可以将它们放在更靠近中心的位置，就像箱线图的盒子一样？

Answer 1

你至少有两种可能性：

• 没有ggplot2：

  require(plotrix)
  plotCI(apply(df,2,mean),li=df[1,],ui=df[2,],xlab="categories",ylab="values")
  axis(side = 1, at = c(1,2), labels = c("case1", "case2"))
  

• 与ggplot2:

首先重新定义你的data.frame：

df2 = data.frame(vmin =  c(0.8945, 0.8943867), vmax=c(0.8950, 0.8952849), case=c("case1", "case2"))

然后，使用geom_errorbar

library(ggplot2)
p <- ggplot(df2, aes(ymin = vmin, ymax = vmax, x = case))
p + geom_errorbar()