Согласно этой записи , которая соответствует моим воспоминаниям, усы рассчитываются как (псевдокод):
upper whisker = min(max(x), Q_3 + 1.5 * IQR)
lower whisker = max(min(x), Q_1 – 1.5 * IQR)
Любые точки за пределами усов считаются выбросами.
Если вы хотите проверить точки выброса, вы можете назначить вывод boxplot
и посмотреть на поле out
, как подсказывает страница справки:
out: the values of any data points which lie beyond the extremes
of the whiskers.
Что-то как
box <- boxplot(rnorm(100))
box$out