Как добавить стриптизершу на ящик без выбросов?

Question

Я сделал boxplot без выбросов.

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

Теперь я пытаюсь добавить stripchart на него:

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

земля выглядит примерно так:

Я понимаю, почему сюжет так: потому что я не зачеркнул выбросы с boxplot. Как правильно добавить stripchart (без выбросов)?

Answer 1

Я решил свою проблему.

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