modify workflows; use more robust checking for cmdstan installs

nicholasjclark · Apr 25, 2024 · 790e89e · 790e89e
1 parent 974a21a
commit 790e89e
Show file tree

Hide file tree

Showing 5 changed files with 12 additions and 2 deletions.
diff --git a/.github/workflows/R-CMD-check-rstan.yaml b/.github/workflows/R-CMD-check-rstan.yaml
@@ -18,7 +18,7 @@ jobs:
       fail-fast: false
       matrix:
         config:
-          - {os: macOS-latest,   r: 'release'}
+          - {os: macos-latest,   r: 'release'}
           - {os: windows-latest, r: 'release'}
           - {os: ubuntu-latest, r: 'devel', http-user-agent: 'release'}
           - {os: ubuntu-latest, r: 'release'}

diff --git a/.github/workflows/R-CMD-check.yaml b/.github/workflows/R-CMD-check.yaml
@@ -6,7 +6,7 @@ on:
   pull_request:
     branches: [main, master]
 
-name: R-CMD-check-cmdstan
+name: R-CMD-check
 
 jobs:
   R-CMD-check:

diff --git a/R/mvgam.R b/R/mvgam.R
@@ -1355,6 +1355,16 @@ mvgam = function(formula,
                                         'laplace'))
     backend <- match.arg(backend, c('rstan',
                                     'cmdstanr'))
+
+    cmdstan_avail <- insight::check_if_installed('cmdstanr',
+                                                 stop = FALSE,
+                                                 quietly = TRUE)
+
+    if(isTRUE(cmdstan_avail)){
+      if(is.null(cmdstanr::cmdstan_version(error_on_NA = FALSE))){
+        backend <- 'rstan'
+      }
+    }
     fit_engine <- 'stan'
     use_cmdstan <- ifelse(backend == 'cmdstanr', TRUE, FALSE)
 

diff --git a/src/mvgam.dll b/src/mvgam.dll
diff --git a/tests/testthat/Rplots.pdf b/tests/testthat/Rplots.pdf