examples

R/si.R

@@ -46,23 +46,23 @@
 #' library(bayestestR)
 #'
 #' prior <- distribution_normal(1000, mean = 0, sd = 1)
-#' posterior <- distribution_normal(1000, mean = .5, sd = .3)
+#' posterior <- distribution_normal(1000, mean = 0.5, sd = 0.3)
 #'
-#' si(posterior, prior)
+#' si(posterior, prior, verbose = FALSE)
 #' \dontrun{
 #' # rstanarm models
 #' # ---------------
 #' library(rstanarm)
 #' contrasts(sleep$group) <- contr.equalprior_pairs # see vignette
 #' stan_model <- stan_lmer(extra ~ group + (1 | ID), data = sleep)
-#' si(stan_model)
-#' si(stan_model, BF = 3)
+#' si(stan_model, verbose = FALSE)
+#' si(stan_model, BF = 3, verbose = FALSE)
 #'
 #' # emmGrid objects
 #' # ---------------
 #' library(emmeans)
 #' group_diff <- pairs(emmeans(stan_model, ~group))
-#' si(group_diff, prior = stan_model)
+#' si(group_diff, prior = stan_model, verbose = FALSE)
 #'
 #' # brms models
 #' # -----------
@@ -77,7 +77,7 @@
 #'   prior = my_custom_priors,
 #'   refresh = 0
 #' ))
-#' si(brms_model)
+#' si(brms_model, verbose = FALSE)
 #' }
 #' @references
 #' Wagenmakers, E., Gronau, Q. F., Dablander, F., & Etz, A. (2018, November 22).