Change help message in geom_bindot() to not include reference to non-existent stat_bindot() (#4166)

orrymr · web-flow · commit 2d54ee94af14 · 2021-03-25T14:33:32.000+01:00
diff --git a/R/stat-bindot.r b/R/stat-bindot.r
@@ -9,7 +9,7 @@ StatBindot <- ggproto("StatBindot", Stat,
 
   setup_params = function(data, params) {
     if (is.null(params$binwidth)) {
-      message("`stat_bindot()` using `bins = 30`. Pick better value with `binwidth`.")
+      message("Bin width defaults to 1/30 of the range of the data. Pick better value with `binwidth`.")
     }
     params
   },

Original file line number	Diff line number	Diff line change
`@@ -9,7 +9,7 @@ StatBindot <- ggproto("StatBindot", Stat,`
`9`	`9`
`10`	`10`	`setup_params = function(data, params) {`
`11`	`11`	`if (is.null(params$binwidth)) {`
`12`		- message("`stat_bindot()` using `bins = 30`. Pick better value with `binwidth`.")
	`12`	+ message("Bin width defaults to 1/30 of the range of the data. Pick better value with `binwidth`.")
`13`	`13`	`}`
`14`	`14`	`params`
`15`	`15`	`},`