R/cov_clm__getDerivativesExprList____main.R

In phmpacheco-ufjf/clm: A package to deal with complex longitudinal survey data

getDerivativesExprList <- function(sigmaThetaExprList) {
  derivativesExprList <- lapply(sigmaThetaExprList$expr, function(expr) {
    stats::deriv(expr, sigmaThetaExprList$paramsNames, hessian = TRUE)
  })

  return(derivativesExprList)
}