R/alpha.cov.R

alpha.cov <-
function(sigma) {
  p <- dim(sigma)[1]
  alpha <- (p / (p - 1)) * (1 - sum(diag(sigma))/sum(sigma))
  return(alpha)
}

Try the multicon package in your browser

Any scripts or data that you put into this service are public.

multicon documentation built on May 2, 2019, 3:18 a.m.