Export GeomBin2d (#6048)

Fix #5791

Author: lgibson7

DESCRIPTION

@@ -135,6 +135,7 @@ Collate:
     'geom-abline.R'
     'geom-rect.R'
     'geom-bar.R'
+    'geom-tile.R'
     'geom-bin2d.R'
     'geom-blank.R'
     'geom-boxplot.R'
@@ -167,7 +168,6 @@ Collate:
     'geom-smooth.R'
     'geom-spoke.R'
     'geom-text.R'
-    'geom-tile.R'
     'geom-violin.R'
     'geom-vline.R'
     'ggplot2-package.R'

NAMESPACE

@@ -172,6 +172,7 @@ export(GeomAbline)
 export(GeomAnnotationMap)
 export(GeomArea)
 export(GeomBar)
+export(GeomBin2d)
 export(GeomBlank)
 export(GeomBoxplot)
 export(GeomCol)

R/geom-bin2d.R

@@ -1,3 +1,6 @@
+#' @include geom-tile.R
+NULL
+
 #' Heatmap of 2d bin counts
 #'
 #' Divides the plane into rectangles, counts the number of cases in
@@ -37,7 +40,7 @@ geom_bin_2d <- function(mapping = NULL, data = NULL,
     data = data,
     mapping = mapping,
     stat = stat,
-    geom = GeomTile,
+    geom = GeomBin2d,
     position = position,
     show.legend = show.legend,
     inherit.aes = inherit.aes,
@@ -53,3 +56,8 @@ geom_bin_2d <- function(mapping = NULL, data = NULL,
 #' @usage NULL
 geom_bin2d <- geom_bin_2d
 
+#' @rdname ggplot2-ggproto
+#' @format NULL
+#' @usage NULL
+#' @export
+GeomBin2d <- ggproto("GeomBin2d", GeomTile)