Fix #3995 export scale_alpha_binned (#3996)

thomasp85 · web-flow · commit 5aca1beb0b39 · 2020-05-18T09:07:25.000+02:00
diff --git a/NAMESPACE b/NAMESPACE
@@ -465,6 +465,7 @@ export(render_strips)
 export(reset_theme_settings)
 export(resolution)
 export(scale_alpha)
+export(scale_alpha_binned)
 export(scale_alpha_continuous)
 export(scale_alpha_date)
 export(scale_alpha_datetime)
diff --git a/R/scale-alpha.r b/R/scale-alpha.r
@@ -27,6 +27,7 @@ scale_alpha <- function(..., range = c(0.1, 1)) {
 scale_alpha_continuous <- scale_alpha
 
 #' @rdname scale_alpha
+#' @export
 scale_alpha_binned <- function(..., range = c(0.1, 1)) {
   binned_scale("alpha", "alpha_b", rescale_pal(range), ...)
 }

Original file line number	Diff line number	Diff line change
`@@ -27,6 +27,7 @@ scale_alpha <- function(..., range = c(0.1, 1)) {`
`27`	`27`	`scale_alpha_continuous <- scale_alpha`
`28`	`28`
`29`	`29`	`#' @rdname scale_alpha`
	`30`	`+#' @export`
`30`	`31`	`scale_alpha_binned <- function(..., range = c(0.1, 1)) {`
`31`	`32`	`binned_scale("alpha", "alpha_b", rescale_pal(range), ...)`
`32`	`33`	`}`