Merge pull request #387 from stan-dev/bugfix-allow-thin-arg-for-stanjm

Drop thin argument when obtaining initial values for stan_jm
stan-dev · Sep 25, 2019 · 25686ff · 25686ff
2 parents 5d91237 + 4087cb0
commit 25686ff
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/stan_jm.fit.R b/R/stan_jm.fit.R
@@ -613,7 +613,7 @@ stan_jm.fit <- function(formulaLong = NULL, dataLong = NULL, formulaEvent = NULL
     # - obtaining initial values for joint model parameters
     # - obtaining appropriate scaling for priors on association parameters
     vbdots <- list(...)
-    dropargs <- c("chains", "cores", "iter", "refresh", "test_grad", "control")
+    dropargs <- c("chains", "cores", "iter", "refresh", "thin", "test_grad", "control")
     for (i in dropargs) 
       vbdots[[i]] <- NULL
     vbpars <- pars_to_monitor(standata, is_jm = FALSE)