如何在没有异常值的箱线图上添加带状图?

How to add stripchart on a boxplot without outliers?

我做了一个 boxplot 没有异常值。

boxplot(data, names = names(files), las = 2, outline=FALSE)

现在,我正在尝试在其上添加 stripchart

stripchart(data, method = "jitter", add = T, col = "red")

情节看起来像这样:

我理解为什么plot是这样的:因为我没有用boxplot画异常值。如何正确添加 stripchart(没有异常值)?

我的问题已经解决了

b <- boxplot(data, names = names(files), las = 2, outline=FALSE)
stripchart(data[!data %in% b$out], method = "jitter", add = T, col = "red",
           vertical = T)