ERROR thrown when trying to draw key for missing pattern

[davidhodge931]

library(ggplot2)
library(ggpattern)

df <- data.frame(x = c(1, 2, 3), y = c(1, 2, NA), fill = c("A", "B", NA))

ggplot(df, aes(x, y, fill = fill, pattern = fill)) +
  geom_col_pattern(position = 'identity')
#> Warning: The `scale_name` argument of `discrete_scale()` is deprecated as of ggplot2
#> 3.5.0.
#> This warning is displayed once every 8 hours.
#> Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
#> generated.
#> Warning: Removed 1 row containing missing values or values outside the scale range
#> (`geom_col_pattern()`).
#> Error in if (pat == "regular_polygon" && is.numeric(params$pattern_shape)) params$pattern_shape <- "convex6": missing value where TRUE/FALSE needed

^{Created on 2024-01-15 with reprex v2.1.0}

[trevorld]

ggpattern doesn't seem to work with DEV ggplot2

Are you sure this is an issue with the release/development version of {ggplot2}?

The issue to me seems to arise when trying to draw a legend for an NA pattern (instead of the "none" pattern) which {ggpattern} doesn't seem to be able to handle.

[trevorld]

• The ERROR message could certainly be made more intuitive
• Not immediately obvious to me that throwing an ERROR in this situation is unreasonable

[davidhodge931]

I initially raised this issue on ggplot2, and the authors there suggested a fix might be to set a default na value

tidyverse/ggplot2#5608

[trevorld]

the authors there suggested a fix might be to set a default na value

I'll look into setting a default na.value = "none" for scale_pattern_discrete()