R/LogLik.R

In GWRM: Generalized Waring Regression Model for Count Data

#' @export
logLik.gw <- function (object, ...){
  val <- object$loglik
  attr(val, "nobs") <- object$nobs
  attr(val, "df") <- length(object$coefficients)
  class(val) <- "logLik"
  val
}