R/estfun.R

#' @export
estfun.default <- function(x, loglik_fn, ...) {
  U <- numDeriv::jacobian(loglik_fn, x = coef(x), ...)
  colnames(U) <- names(coef(x))
  return(U)
}
paulnorthrop/oola documentation built on May 12, 2019, 10:52 a.m.