R/Autils.R

In BfRstats/rriskBayes2: Predefined Bayes models fitted with Markov chain Monte Carlo (MCMC) (related to the 'rrisk' project)

# convergence check -------------------------------------------------------

checkPSRF <- function(x){
  ##check if psrf is smaller than target psrf
  res <- any(x$psrf$psrf[,"Point est."]< x$psrf$psrf.target)
  return(res)
}