r - 我们如何检测 R 中箱线图中的下限和上限？

Question

假设我们有以下代码生成随机数并绘制箱线图：

set.seed(1)
a=rchisq(1000,2)
boxplot(a,ylim=c(-5,15))
abline(h=(summary(a))[2]-1.5*IQR(a),col="red")   # Wrong!
abline(h=1.5*IQR(a)+(summary(a))[5],col="red")  # OK! The red line and upper extreme cover each other.

我们如何画一条穿过下限的线？

Answer 1

boxplot返回其统计信息，因此如果在调用时将其保存到变量中，则可以稍后使用：

b <- boxplot(a,ylim=c(-5,15))
abline(h=b$stats[1,],col="red")
abline(h=b$stats[5,],col="red")

Answer 2

abline(h=summary(a)[1])  # ........

要不就：

abline(h=min(a) )

如果阴影暗示，您不需要数据中的极端，而是“胡须的极端”，那么：

abline( h=boxplot.stats$stats[1] )