R/bollen.loglik.R

Defines functions bollen.loglik

Documented in bollen.loglik

## formula Bollen, 1989 4B.2 page 135
bollen.loglik <- function(N,S,Sigma) {
  Nstar <- N-1
  bll <- -Nstar/2 * (log(det(Sigma)) + sum(diag(S%*%solve(Sigma))))
  return(bll)
}

Try the influence.SEM package in your browser

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

influence.SEM documentation built on May 11, 2022, 9:05 a.m.