diff --git a/R/guide-colorbar.R b/R/guide-colorbar.R index 0f99d7afcc..ad71d0bc82 100644 --- a/R/guide-colorbar.R +++ b/R/guide-colorbar.R @@ -223,7 +223,11 @@ GuideColourbar <- ggproto( cli::cli_warn("{.fn guide_colourbar} needs continuous scales.") return(NULL) } - Guide$extract_key(scale, aesthetic, ...) + key <- Guide$extract_key(scale, aesthetic, ...) + if (NROW(key) == 0) { + return(NULL) + } + key }, extract_decor = function(scale, aesthetic, nbin = 300, reverse = FALSE, alpha = NA, ...) {