R/icl.calc.R

Defines functions icl.calc

icl.calc <-
function(bic,wt){
  constraint <- sum(log(apply(wt,2,max)))
  val <- bic + constraint
  return(val)
}

Try the MixSAL package in your browser

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

MixSAL documentation built on May 2, 2019, 7:04 a.m.