From 6ac10e603787b4d1f351663b72d48cde475ab556 Mon Sep 17 00:00:00 2001 From: LuisDVA Date: Wed, 8 Oct 2025 13:28:24 -0600 Subject: [PATCH 1/2] example for omitting legend items --- R/guide-legend.R | 6 ++++++ man/guide_legend.Rd | 6 ++++++ 2 files changed, 12 insertions(+) diff --git a/R/guide-legend.R b/R/guide-legend.R index 6378300c6d..cac6c19cbb 100644 --- a/R/guide-legend.R +++ b/R/guide-legend.R @@ -89,6 +89,12 @@ #' # override.aes overwrites the alpha #' p3 + guides(colour = guide_legend(override.aes = list(alpha = 1))) #' +#' omit legend items +#' p4 <- ggplot(mtcars, aes(wt, mpg, colour = factor(cyl))) + +#' geom_point() +#' p4 +#' p4 + scale_color_discrete(breaks = c(4, 8)) +#' #' # multiple row/col legends #' df <- data.frame(x = 1:20, y = 1:20, color = letters[1:20]) #' p <- ggplot(df, aes(x, y)) + diff --git a/man/guide_legend.Rd b/man/guide_legend.Rd index e56efb0aff..58697c5128 100644 --- a/man/guide_legend.Rd +++ b/man/guide_legend.Rd @@ -114,6 +114,12 @@ p3 # override.aes overwrites the alpha p3 + guides(colour = guide_legend(override.aes = list(alpha = 1))) +omit legend items +p4 <- ggplot(mtcars, aes(wt, mpg, colour = factor(cyl))) + + geom_point() +p4 +p4 + scale_color_discrete(breaks = c(4, 8)) + # multiple row/col legends df <- data.frame(x = 1:20, y = 1:20, color = letters[1:20]) p <- ggplot(df, aes(x, y)) + From 6a854002157f655ee11acc4359cb40ec9867681f Mon Sep 17 00:00:00 2001 From: LuisDVA Date: Wed, 8 Oct 2025 13:28:46 -0600 Subject: [PATCH 2/2] example for omitting legend items --- R/guide-legend.R | 2 +- man/guide_legend.Rd | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/R/guide-legend.R b/R/guide-legend.R index cac6c19cbb..0f8b90d127 100644 --- a/R/guide-legend.R +++ b/R/guide-legend.R @@ -89,7 +89,7 @@ #' # override.aes overwrites the alpha #' p3 + guides(colour = guide_legend(override.aes = list(alpha = 1))) #' -#' omit legend items +#' # omit legend items #' p4 <- ggplot(mtcars, aes(wt, mpg, colour = factor(cyl))) + #' geom_point() #' p4 diff --git a/man/guide_legend.Rd b/man/guide_legend.Rd index 58697c5128..2001b171cf 100644 --- a/man/guide_legend.Rd +++ b/man/guide_legend.Rd @@ -114,7 +114,7 @@ p3 # override.aes overwrites the alpha p3 + guides(colour = guide_legend(override.aes = list(alpha = 1))) -omit legend items +# omit legend items p4 <- ggplot(mtcars, aes(wt, mpg, colour = factor(cyl))) + geom_point() p4