R/tracel2.R

Defines functions tracel2

Documented in tracel2

tracel2 <- function(Sigma, Omega) {
  return(sum(diag(  (Sigma%*%Omega -  diag(1,  dim(Omega)[1] ) )^2 )) )
}

Try the clime package in your browser

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

clime documentation built on June 22, 2022, 5:07 p.m.