run internals using rstan to avoid strange cmdstanr namespace warning

nicholasjclark · Sep 30, 2024 · a51df94 · a51df94
1 parent 400156c
commit a51df94
Show file tree

Hide file tree

Showing 5 changed files with 10 additions and 5 deletions.
diff --git a/R/sysdata.rda b/R/sysdata.rda
diff --git a/src/RcppExports.o b/src/RcppExports.o
diff --git a/src/mvgam.dll b/src/mvgam.dll
diff --git a/src/trend_funs.o b/src/trend_funs.o
diff --git a/tests/mvgam_examples.R b/tests/mvgam_examples.R
@@ -150,7 +150,8 @@ mvgam_example1 <- mvgam(y ~ s(season, k = 5),
                         data = mvgam_examp_dat$data_train,
                         burnin = 300,
                         samples = 30,
-                        chains = 1)
+                        chains = 1,
+                        backend = 'rstan')
 
 # Univariate process with trend_formula, trend_map and correlated process errors
 trend_map <- data.frame(series = unique(mvgam_examp_dat$data_train$series),
@@ -163,7 +164,8 @@ mvgam_example2 <- mvgam(y ~ 1,
                         data = mvgam_examp_dat$data_train,
                         burnin = 300,
                         samples = 30,
-                        chains = 1)
+                        chains = 1,
+                        backend = 'rstan')
 
 # Multivariate process without trend_formula
 mvgam_example3 <- mvgam(y ~ s(season, k = 5),
@@ -172,7 +174,8 @@ mvgam_example3 <- mvgam(y ~ s(season, k = 5),
                         data = mvgam_examp_dat$data_train,
                         burnin = 300,
                         samples = 30,
-                        chains = 1)
+                        chains = 1,
+                        backend = 'rstan')
 
 # Multivariate process with trend_formula and moving averages
 mvgam_example4 <- mvgam(y ~ series,
@@ -182,7 +185,8 @@ mvgam_example4 <- mvgam(y ~ series,
                         data = mvgam_examp_dat$data_train,
                         burnin = 300,
                         samples = 30,
-                        chains = 1)
+                        chains = 1,
+                        backend = 'rstan')
 
 # GP dynamic factors (use list format to ensure it works in tests)
 list_data <- list()
@@ -198,7 +202,8 @@ mvgam_example5 <- mvgam(y ~ series + s(season, k = 5),
                         data = list_data,
                         burnin = 300,
                         samples = 30,
-                        chains = 1)
+                        chains = 1,
+                        backend = 'rstan')
 
 # Save examples as internal data
 usethis::use_data(