Вы не можете изменить, какие geoms
отображаются в легенде с помощью функции guides
, вы можете изменить только их внешний вид (например, заголовок, эстетика ...).
Один из вариантов здесь заключается в том, чтобы эстетика color
применялась только к точкам, не указывая ее в основном вызове ggplot
, а только в geom_point
, но это приводит к тому, что боксы не будут окрашены:
stockmlp %>%
ggplot(aes(y = RMSE, x = Depth)) +
geom_boxplot(alpha = 0) +
geom_point(size = 10, alpha = 0.5, aes(color = Depth)) +
facet_wrap(~Stock, scales="free_y")
Лучший вариант - указать, чтобы в вызове geom
не отображалась легенда:
stockmlp %>%
ggplot(aes(y = RMSE, x = Depth, color = Depth)) +
geom_boxplot(alpha = 0, show.legend = F) +
geom_point(size = 10, alpha = 0.5) +
facet_wrap(~Stock, scales="free_y")