tidyverse · yutannihilation · Apr 24, 2019 · Apr 13, 2019 · Apr 13, 2019 · Apr 13, 2019
diff --git a/NAMESPACE b/NAMESPACE
@@ -32,6 +32,7 @@ S3method(fortify,cld)
 S3method(fortify,confint.glht)
 S3method(fortify,data.frame)
 S3method(fortify,default)
+S3method(fortify,formula)
 S3method(fortify,glht)
 S3method(fortify,grouped_df)
 S3method(fortify,lm)

diff --git a/NEWS.md b/NEWS.md
@@ -138,6 +138,9 @@ core developer team.
   now renamed to always match the ones of `Stat$compute_layer()` and
   `Position$compute_layer()` (@yutannihilation, #3202).
 
+* `geom_*()` and `stat_*()` now accepts purrr-style lambda notation
+  (@yutannihilation, #3138).
+
 # ggplot2 3.1.0
 
 ## Breaking changes

diff --git a/R/fortify.r b/R/fortify.r
@@ -26,6 +26,9 @@ fortify.tbl <- function(model, data, ...) {
 fortify.NULL <- function(model, data, ...) waiver()
 #' @export
 fortify.function <- function(model, data, ...) model
+# accept purrr-style lambda notation
+#' @export
+fortify.formula <- function(model, data, ...) as_function(model)
 #' @export
 fortify.grouped_df <- function(model, data, ...) {
   if (!requireNamespace("dplyr", quietly = TRUE)) {

diff --git a/R/layer.r b/R/layer.r
@@ -22,7 +22,8 @@
 #'
 #'    A `function` will be called with a single argument,
 #'    the plot data. The return value must be a `data.frame`, and
-#'    will be used as the layer data.
+#'    will be used as the layer data. A `function` can be created
+#'    from a `formula` (e.g. `~ head(.x, 10)`).
 #' @param geom The geometric object to use display the data
 #' @param stat The statistical transformation to use on the data for this
 #'    layer, as a string.

diff --git a/man/borders.Rd b/man/borders.Rd
diff --git a/man/geom_abline.Rd b/man/geom_abline.Rd
diff --git a/man/geom_bar.Rd b/man/geom_bar.Rd
diff --git a/man/geom_bin2d.Rd b/man/geom_bin2d.Rd
diff --git a/man/geom_blank.Rd b/man/geom_blank.Rd
diff --git a/man/geom_boxplot.Rd b/man/geom_boxplot.Rd
diff --git a/man/geom_contour.Rd b/man/geom_contour.Rd
diff --git a/man/geom_count.Rd b/man/geom_count.Rd
diff --git a/man/geom_density.Rd b/man/geom_density.Rd
diff --git a/man/geom_density_2d.Rd b/man/geom_density_2d.Rd
diff --git a/man/geom_dotplot.Rd b/man/geom_dotplot.Rd
diff --git a/man/geom_errorbarh.Rd b/man/geom_errorbarh.Rd
diff --git a/man/geom_hex.Rd b/man/geom_hex.Rd
diff --git a/man/geom_histogram.Rd b/man/geom_histogram.Rd
diff --git a/man/geom_jitter.Rd b/man/geom_jitter.Rd
diff --git a/man/geom_linerange.Rd b/man/geom_linerange.Rd
diff --git a/man/geom_map.Rd b/man/geom_map.Rd
diff --git a/man/geom_path.Rd b/man/geom_path.Rd
diff --git a/man/geom_point.Rd b/man/geom_point.Rd
diff --git a/man/geom_polygon.Rd b/man/geom_polygon.Rd
diff --git a/man/geom_qq.Rd b/man/geom_qq.Rd
diff --git a/man/geom_quantile.Rd b/man/geom_quantile.Rd
diff --git a/man/geom_ribbon.Rd b/man/geom_ribbon.Rd
diff --git a/man/geom_rug.Rd b/man/geom_rug.Rd
diff --git a/man/geom_segment.Rd b/man/geom_segment.Rd
diff --git a/man/geom_smooth.Rd b/man/geom_smooth.Rd
diff --git a/man/geom_spoke.Rd b/man/geom_spoke.Rd
diff --git a/man/geom_text.Rd b/man/geom_text.Rd
diff --git a/man/geom_tile.Rd b/man/geom_tile.Rd
diff --git a/man/geom_violin.Rd b/man/geom_violin.Rd
diff --git a/man/ggsf.Rd b/man/ggsf.Rd
diff --git a/man/layer.Rd b/man/layer.Rd
diff --git a/man/layer_sf.Rd b/man/layer_sf.Rd
diff --git a/man/stat_ecdf.Rd b/man/stat_ecdf.Rd
diff --git a/man/stat_ellipse.Rd b/man/stat_ellipse.Rd