R/logLik.Nmix.R

Defines functions logLik.Nmix

Documented in logLik.Nmix

logLik.Nmix <-
function(object, ...) {
  llik <- -object$logLik
  ndf <- length(coef(object))
  nam.obj <- deparse(substitute(object))
  cat("logLik(", nam.obj, ") = ", round(llik, 4), " (df = ", ndf, ")", "\n", sep="")
  return(invisible(llik))
}

Try the jointNmix package in your browser

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

jointNmix documentation built on May 2, 2019, 8:18 a.m.