Update outdated ggscatterstats vignette examples to match current API (#1041)

Author: Copilot

vignettes/web_only/faq.Rmd

@@ -114,7 +114,7 @@ ggscatterstats(df, x, y, type = "robust")
 To see why the statistical analysis failed, you can look at the error from the
 underlying function:
 
-```{r}
+```{r faq1}
 #| error = TRUE
 library(statsExpressions)
 df <- data.frame(x = 1, y = 2)
@@ -318,7 +318,7 @@ Behind the scenes, `{ggstatsplot}` uses `statsExpressions::pairwise_comparisons(
 
 You can use it to extract actual data frames used in `{ggstatsplot}` functions.
 
-```{r}
+```{r faq2}
 library(ggplot2)
 
 pairwise_comparisons(mtcars, cyl, wt)
@@ -569,7 +569,7 @@ shinyApp(ui, server)
 
 ## 23. How to change size of annotations for combined plot in `grouped_*` functions?
 
-```{r}
+```{r faq3}
 library(ggplot2)
 
 grouped_ggbetweenstats(
@@ -592,7 +592,7 @@ grouped_ggbetweenstats(
 
 ## 24. How to change size of text in the subtitle?
 
-```{r}
+```{r faq4}
 ggbetweenstats(
   data = iris,
   x = Species,
@@ -639,7 +639,7 @@ For MacOS, have a look at this [post](https://stackoverflow.com/questions/353608
 
 ## 28. How to modify the secondary Y-axis title?
 
-```{r}
+```{r faq5}
 ggbetweenstats(
   mtcars, cyl, wt,
   ggplot.component = list(
@@ -650,7 +650,7 @@ ggbetweenstats(
 
 ## 29. How to turn off scientific notation in expressions?
 
-```{r}
+```{r faq6}
 set.seed(123)
 library(ggstatsplot)
 library(WRS2)
@@ -677,7 +677,7 @@ By default, the whiskers in `ggbetweenstats()` box plots extend to 1.5 times the
 interquartile range (IQR) from the box, following the Tukey method. You can 
 customize this using the `coef` parameter in `boxplot.args`:
 
-```{r}
+```{r faq7}
 # Default whiskers (1.5 * IQR)
 ggbetweenstats(
   data = mtcars,

vignettes/web_only/ggcoefstats.Rmd

@@ -462,11 +462,14 @@ library(metaplus)
 # renaming to what the function expects
 df <- dplyr::rename(mag, estimate = yi, std.error = sei, term = study)
 
-ggcoefstats(
-  x = df,
-  meta.analytic.effect = TRUE,
-  meta.type = "bayes",
-  title = "Bayesian random-effects meta-analysis"
+# suppress Stan's divergent transitions warning (not under our control)
+suppressWarnings(
+  ggcoefstats(
+    x = df,
+    meta.analytic.effect = TRUE,
+    meta.type = "bayes",
+    title = "Bayesian random-effects meta-analysis"
+  )
 )
 ```
 

vignettes/web_only/ggscatterstats.Rmd

@@ -83,8 +83,8 @@ ggscatterstats(
   label.var = title, ## variable to use for labeling data points
   label.expression = rating < 5 & budget > 100, ## expression for deciding which points to label
   point.label.args = list(alpha = 0.7, size = 4, color = "grey50"),
-  xfill = "#CC79A7", ## fill for marginals on the x-axis
-  yfill = "#009E73", ## fill for marginals on the y-axis
+  xsidehistogram.args = list(fill = "#CC79A7"), ## fill for marginals on the x-axis
+  ysidehistogram.args = list(fill = "#009E73"), ## fill for marginals on the y-axis
   title = "Relationship between movie budget and IMDB rating",
   caption = "Source: www.imdb.com"
 )

vignettes/web_only/purrr_examples.Rmd

@@ -272,8 +272,16 @@ plot_list <- purrr::pmap(
       quote(rating > 8 & budget < 10)
     ),
     type = list("r", "np", "bf"),
-    xfill = list("#009E73", "#999999", "#0072B2"),
-    yfill = list("#CC79A7", "#F0E442", "#D55E00"),
+    xsidehistogram.args = list(
+      list(fill = "#009E73"),
+      list(fill = "#999999"),
+      list(fill = "#0072B2")
+    ),
+    ysidehistogram.args = list(
+      list(fill = "#CC79A7"),
+      list(fill = "#F0E442"),
+      list(fill = "#D55E00")
+    ),
     ggtheme = list(
       ggthemes::theme_tufte(),
       ggplot2::theme_classic(),