Fix themes

Author: martinmodrak

R/backend-function.R

@@ -1,7 +1,7 @@
 #' A backend that just calls a function.
 #'
 #' If the function returns a `draws_matrix` object, no other
-#' work is necessary to make it work with SBC.
+#' work is necessary to make it work with SBC. Useful for quick tests.
 #'
 #' @param func the function that will be called in [SBC_fit()]
 #' @param generated_arg name of the argument of `func` that will receive the

examples/backend-function-example.R

@@ -4,6 +4,9 @@
 # See https://math.stackexchange.com/a/5085538/423833 for derivation that it
 # is generalized gamma distribution. Here we test this is correct.
 
+library(ggplot2)
+theme_set(theme_minimal())
+
 N_sims <- 100
 df <- 5
 z <- rnorm(N_sims)

vignettes/SBC.Rmd

@@ -129,7 +129,8 @@ In this vignette we will demonstrate how the interface is used with a simple poi
 setup and configure our environment.
 
 ```{r setup, message=FALSE,warning=FALSE, results="hide"}
-library(SBC);
+library(SBC)
+library(ggplot2)
 
 use_cmdstanr <- getOption("SBC.vignettes_cmdstanr", TRUE) # Set to false to use rstan instead
 
@@ -161,6 +162,7 @@ if(!dir.exists(cache_dir)) {
   dir.create(cache_dir)
 }
 
+theme_set(theme_minimal())
 ```
 
 ```{r enable progressr, eval = FALSE}