R/lambdamax.diag.mcmc.list.R

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

Defines functions lambdamax.diag.mcmc.list

Documented in lambdamax.diag.mcmc.list

lambdamax.diag.mcmc.list <-
function(x, ...)
{
    rval <- max(eigen(var(as.matrix(x)), symmetric=TRUE, only.values=TRUE)$values)
    class(rval) <- "lambdamax.diag"
    attr(rval, "npar") <- nvar(x)
    attr(rval, "n.clones") <- nclones(x)
    rval
}