MCMC Convergence Diagnostics
This function computes Geweke's Convergence diagnostic making use of the coda package.
conv.diag(object, crit.val=1.96)
object |
a fitted |
crit.val |
critical value used for test statistic. |
Geweke (1992) proposed a convergence diagnostic for Markov chains based on a test for equality of the means of the first and last part of a Markov chain (by default we use the first 10% and the last 50%). If the samples are drawn from the stationary distribution of the chain, the two means are equal and Geweke's statistic has an asymptotically standard normal distribution. The test statistic is a standard Z-score: the difference between the two sample means divided by its estimated standard error. The standard error is estimated from the spectral density at zero and so takes into account any autocorrelation.
Returns an object of class bgvar.CD. This is a list with
geweke.z Z-scores for a test of equality of means between the first and last parts of the chain. A separate statistic is calculated for each variable in each chain.
perc is the percentage of Z-scores exceeding crit.val (in absolute terms).
Martin Feldkircher
Geweke, J. (1992) Evaluating the accuracy of sampling-based approaches to calculating posterior moments. Bayesian Statistics 4 (edited by JM Bernado, JO Berger, AP Dawid and AFM Smith). Clarendon Press, Oxford, UK.
geweke.diag in the coda package.
library(BGVAR) data(eerDatasmall) model.mn <- bgvar(Data=eerDatasmall,W=W.trade0012.small,plag=1,draws=200,burnin=200,prior="MN") geweke <- conv.diag(model.mn)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.