Allows breaks to be a function in geom_contour()

[eliocamp]

This is a refreshed version of #2320

library(ggplot2)

v <- ggplot(faithfuld, aes(waiting, eruptions, z = density))
v + geom_contour(binwidth = 0.001)

my_breaks <- function(range, binwidth) {
  b <- scales::fullseq(range, binwidth)
  b[b != 0.002]  # remove the 0.002 contour
}

v + geom_contour(breaks = my_breaks, binwidth = 0.001)

^{Created on 2021-10-28 by the reprex package (v2.0.0)}

[thomasp85]

Thanks - can I get you to update it so that a lambda function can be supplied in line with (what a aspire to) do with other arguments of this type?

[eliocamp]

Ah, yes. That's be something like breaks = ~ fullseq(.x, .y)?

[thomasp85]

Yup - you can use the utility function here to convert the input argument:

ggplot2/R/scale-.r

Lines 1199 to 1201 in 759c63c

	allow_lambda <- function(x) {
	if (is_formula(x)) as_function(x) else x
	}

[eliocamp]

There.

[thomasp85]

great - can you add a bullet to NEWS?

[thomasp85]

Thanks