use geom_bin_2d() just like geom_density_2d() (#4449)

Author: clauswilke

NAMESPACE

@@ -343,6 +343,7 @@ export(geom_abline)
 export(geom_area)
 export(geom_bar)
 export(geom_bin2d)
+export(geom_bin_2d)
 export(geom_blank)
 export(geom_boxplot)
 export(geom_col)

R/geom-bin2d.r

@@ -11,20 +11,20 @@
 #' @inheritParams layer
 #' @inheritParams geom_point
 #' @param geom,stat Use to override the default connection between
-#'   `geom_bin2d()` and `stat_bin2d()`.
+#'   `geom_bin_2d()` and `stat_bin_2d()`.
 #' @seealso [stat_binhex()] for hexagonal binning
 #' @examples
 #' d <- ggplot(diamonds, aes(x, y)) + xlim(4, 10) + ylim(4, 10)
-#' d + geom_bin2d()
+#' d + geom_bin_2d()
 #'
 #' # You can control the size of the bins by specifying the number of
 #' # bins in each direction:
-#' d + geom_bin2d(bins = 10)
-#' d + geom_bin2d(bins = 30)
+#' d + geom_bin_2d(bins = 10)
+#' d + geom_bin_2d(bins = 30)
 #'
 #' # Or by specifying the width of the bins
-#' d + geom_bin2d(binwidth = c(0.1, 0.1))
-geom_bin2d <- function(mapping = NULL, data = NULL,
+#' d + geom_bin_2d(binwidth = c(0.1, 0.1))
+geom_bin_2d <- function(mapping = NULL, data = NULL,
                        stat = "bin2d", position = "identity",
                        ...,
                        na.rm = FALSE,
@@ -45,3 +45,9 @@ geom_bin2d <- function(mapping = NULL, data = NULL,
     )
   )
 }
+
+#' @export
+#' @rdname geom_bin_2d
+#' @usage NULL
+geom_bin2d <- geom_bin_2d
+

R/stat-bin2d.r

@@ -4,7 +4,7 @@
 #'   horizontal directions. Overrides `bins` if both set.
 #' @param drop if `TRUE` removes all cells with 0 counts.
 #' @export
-#' @rdname geom_bin2d
+#' @rdname geom_bin_2d
 #' @section Computed variables:
 #' \describe{
 #'   \item{count}{number of points in bin}
@@ -41,7 +41,7 @@ stat_bin_2d <- function(mapping = NULL, data = NULL,
 
 
 #' @export
-#' @rdname geom_bin2d
+#' @rdname geom_bin_2d
 #' @usage NULL
 stat_bin2d <- stat_bin_2d