R中箱线图boxplot，触须是如何计算的
有人说是Q3 + 1.5 (Q3-Q2)，但是觉得不对，比如
x <- c(-20, seq(1, 100), 200, 300)
boxplot(x)
很明显上触须的边缘才100多一点。

如何计算触须？谢谢！