diff --git a/DESCRIPTION b/DESCRIPTION index 00dd702..e88b4c4 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: dynamite Title: Bayesian Modeling and Causal Inference for Multivariate Longitudinal Data -Version: 1.5.3 +Version: 1.5.4 Authors@R: c( person("Santtu", "Tikka", email = "santtuth@gmail.com", role = c("aut", "cre"), comment = c(ORCID = "0000-0003-4039-4342")), diff --git a/R/stan_utilities.R b/R/stan_utilities.R index 8bd6d1b..9191494 100644 --- a/R/stan_utilities.R +++ b/R/stan_utilities.R @@ -132,8 +132,8 @@ get_model_code <- function(x) { #' #' @inheritParams get_pars_oi #' @noRd -get_num_chains <- function(x) { - UseMethod("get_num_chains") +get_nchains <- function(x) { + UseMethod("get_nchains") } #' Get the algorithm used in a Stan model fit @@ -200,11 +200,11 @@ get_model_code.CmdStanMCMC <- function(x) { x$code() } -get_num_chains.stanfit <- function(x) { +get_nchains.stanfit <- function(x) { x@sim$chains } -get_num_chains.CmdStanMCMC <- function(x) { +get_nchains.CmdStanMCMC <- function(x) { x$num_chains() }