Running examples in ‘ggmulti-Ex.R’ failed
The error most likely occurred in:

> ### Name: geom_hist_
> ### Title: More general histogram
> ### Aliases: geom_hist_ geom_histogram_ geom_bar_ stat_hist_ stat_bin_
> ###   stat_count_
> 
> ### ** Examples
> 
> if(require(dplyr) && require(tidyr)) {
+ 
+   # histogram
+   p0 <- mpg %>%
+     dplyr::filter(manufacturer %in% c("dodge", "ford", "toyota", "volkswagen")) %>%
+     ggplot(mapping = aes(x = manufacturer, y = cty))
+   p0 + geom_hist_()
+ 
+   ## set position
+   #### default is "stack_"
+   p0 + geom_hist_(mapping = aes(fill = fl))
+   #### "dodge_"
+   p0 + geom_hist_(position = "dodge_",
+                   mapping = aes(fill = fl))
+   #### "dodge2_"
+   p0 + geom_hist_(position = "dodge2_",
+                   mapping = aes(fill = fl))
+ 
+   # bar chart
+   mpg %>%
+     ggplot(mapping = aes(x = drv, y = class)) +
+     geom_hist_(orientation = "y")
+ 
+   # scale.y as "group"
+   p <- iris %>%
+     tidyr::pivot_longer(cols = -Species,
+                         names_to = "Outer sterile whorls",
+                         values_to = "x") %>%
+     ggplot(mapping = aes(x = `Outer sterile whorls`,
+                          y = x, fill = Species)) +
+     stat_hist_(scale.y = "group",
+                prop = 0.6,
+                alpha = 0.5)
+   p
+   # with density on the left
+   p + stat_density_(scale.y = "group",
+                     prop = 0.6,
+                     alpha = 0.5,
+                     positive = FALSE)
+ 
+   ########### only `x` or `y` is provided ###########
+   # that would be equivalent to call function
+   # `geom_histogram()` or `geom_bar()`
+   ### histogram
+   diamonds %>%
+     dplyr::sample_n(500) %>%
+     ggplot(mapping = aes(x = price)) +
+     geom_hist_()
+   ### bar chart
+   diamonds %>%
+     dplyr::sample_n(500) %>%
+     ggplot(mapping = aes(x = cut)) +
+     geom_hist_()
+ }
Loading required package: dplyr

Attaching package: ‘dplyr’

The following objects are masked from ‘package:stats’:

    filter, lag

The following objects are masked from ‘package:base’:

    intersect, setdiff, setequal, union

Loading required package: tidyr
Error in `geom_hist_()`:
! Problem while computing stat.
ℹ Error occurred in the 1st layer.
Caused by error in `setup_params()`:
! `stat_hist_()` requires a continuous x aesthetic
✖ the x aesthetic is discrete.
ℹ Perhaps you want `stat="count"`?
Backtrace:
     ▆
  1. ├─base (local) `<fn>`(x)
  2. └─ggplot2:::print.ggplot(x)
  3.   ├─ggplot2::ggplot_build(x)
  4.   ├─ggmulti:::ggplot_build.gg(x)
  5.   ├─base::NextMethod()
  6.   └─ggplot2:::ggplot_build.ggplot(x)
  7.     └─ggplot2:::by_layer(...)
  8.       ├─rlang::try_fetch(...)
  9.       │ ├─base::tryCatch(...)
 10.       │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
 11.       │ │   └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
 12.       │ │     └─base (local) doTryCatch(return(expr), name, parentenv, handler)
 13.       │ └─base::withCallingHandlers(...)
 14.       └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
 15.         └─l$compute_statistic(d, layout)
 16.           └─ggplot2 (local) compute_statistic(..., self = self)
 17.             └─self$stat$setup_params(data, self$stat_params)
 18.               └─ggmulti (local) setup_params(..., self = self)
 19.                 └─ggplot2::ggproto_parent(ggplot2::StatBin, self)$setup_params(...)
 20.                   └─ggplot2 (local) setup_params(..., self = self)
 21.                     └─cli::cli_abort(...)
 22.                       └─rlang::abort(...)
Execution halted