diff --git a/compareMCMCs/R/MCMCdef_jags.R b/compareMCMCs/R/MCMCdef_jags.R index 0bfefdb..a6d72b3 100644 --- a/compareMCMCs/R/MCMCdef_jags.R +++ b/compareMCMCs/R/MCMCdef_jags.R @@ -30,6 +30,7 @@ MCMCdef_jags_impl <- function(MCMCinfo, }) setupTime <- setupTimeResult[3] + burninTimeResult <- system.time(0) ## needs to be defined even when burnin = 0 burninTime <- 0 if(MCMCcontrol$burnin > 0) { burninTimeResult <- system.time(