在anova的异常值

Question

是否有某种方法可以从QQ图中以数字方式识别异常值？

非常感谢提前!!!

m0 <- aov(y2 ~ bk + bc, data = dat2)
summary(m0)
qqnorm(resid(m0))
qqline(resid(m0))

# with "car" package
library(car)
identify(qqPlot(resid(m0),pch=1))