Удаление выбросов из ящиков с facet_wrap в ggplot
Как я могу изменить ось y, чтобы исключить выбросы (не только скрыть их, но и масштабировать ось y, чтобы не включать их) для geom_boxplot с несколькими отдельными боксплотами, используя facet_wrap? Пример моего набора данных:
Pop. grp1 grp2 grp3 grp4 grp5 grp6 grp7 grp8
a 0.00652 1.27 0.169 0.859 0.388 0.521 3.58 0.0912
a 0.0133 0.136 0.154 0.167 0.845 0.159 0.561 0.108
a 0.0270 1.60 0.119 0.515 0.0386 0.0145 0.884 0.0155
b 0.00846 0.331 0.100 0.897 0.330 2.52 0.663 0.0338
b 0.0154 0.0997 0.122 0.0873 0.905 0.136 0.413 0.139
b 0.0353 0.536 0.171 0.471 0.0280 0.00608 0.414 0.00973
где я хотел бы сделать коробку для каждого столбца, показывающего группы населения a и b.
Я растопил данные по населению, а затем использовал geom_boxplot + facet_wrap, но некоторые выбросы так далеко выше усов, что сами коробки почти не показывают. Код, который я использовал:
wc.m <- melt(w_c_diff_ab, id.var="Pop.")
p.wc <- ggplot(data = wc.m, aes(x=variable, y=value)) + geom_boxplot(aes(fill=Population))
p.wc + facet_wrap( ~ variable, scales="free") + scale_fill_manual(values=c("skyblue", violetred1"))
но я изо всех сил пытаюсь удалить выбросы, поскольку я не уверен, как рассчитать пределы для осей Y для каждого бокса.