R/vcov.mcmc.list.dc.R

In dclone: Data Cloning and MCMC Tools for Maximum Likelihood Methods

Defines functions vcov.mcmc.list.dc

Documented in vcov.mcmc.list.dc

vcov.mcmc.list.dc <-
function(object, invfisher = TRUE, ...)
{
    rval <- cov(as.matrix(object), ...)
    if (invfisher)
        rval <- rval * nclones(object)
    rval
}

Try the dclone package in your browser