r - 如何绘制一个箱线图，其订书钉看起来像 R 中的方括号

Question

如何绘制这样的箱线图:

使订书钉(下四分位数/上四分位数 1.5 IQR 内的数据标记)看起来像方括号。

我尝试过:

bx = sapply(5:1, function(x) rnorm(100, x, sqrt(x)))

boxplot(bx, col = "gray", pch = "", boxwex = 0.3,
  medlwd = rep(3, 4), medcol = rep("white", 4),
  outlty = 1, outwex = 1, 
  whisklty = 1, 
  staplelty = 1, staplewex = 1,
  names = paste0("mu = ", 5:1))

title(main = "n = 100")

<小时/>

Answer 1

我不相信用 staplelty 可以做到这一点。但是，您可以将订书钉绘制为水平线并添加垂直刻度。

boxplot(iris[,1:4], outlty=1, pch="")

for(i in 1:4) {
    segments(c(i-0.2,i+0.2), BP$stats[5,i], c(i-0.2,i+0.2), BP$stats[5,i] - 0.1)
    segments(c(i-0.2,i+0.2), BP$stats[1,i], c(i-0.2,i+0.2), BP$stats[1,i] + 0.1)
}