R/logLik.parfm.R

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
################################################################################
#  logLik method for class 'parfm'                                             #
################################################################################
#                                                                              #
#  logLik.parfm implemets the logLik function the objects of class 'parfm'     #
#                                                                              #
#  It is necessary in oder to compute AIC and BIC values via the standard      #
#    functions AIC() and BIC()                                                 #
#                                                                              #
#                                                                              #
#   Date: December 21, 2011                                                    #
#                                                                              #
################################################################################

logLik.parfm <- function(object,
                         ...) {
  lL <- attributes(object)$loglik
  attributes(lL)$df <- dim(object)[1]
  attributes(lL)$nobs <- attributes(object)$nobs
  return(lL)
}

Questions? Problems? Suggestions? or email at ian@mutexlabs.com.

Please suggest features or report bugs with the GitHub issue tracker.

All documentation is copyright its authors; we didn't write any of that.