r ggplot ocultar un grupo de leyendas de múltiples leyendas

p2 + guides(color = FALSE, size = FALSE)
Panicky Pony