Commit 95c5511e authored by matbuoro's avatar matbuoro
Browse files

gelman diagnostic added

parent 74b819a1
......@@ -142,6 +142,7 @@ if (nChains > 1) {
cat("Convergence: gelman-Rubin R test\n")
gelman.diag(fit.mcmc[,which(varnames(fit.mcmc)%in%parameterstotest)],multivariate=TRUE)
}
cat("Approximate convergence is diagnosed when the upper limit is close to 1 and <1.1 \n")
cat("\n---------------------------\n")
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment