R/cov_clm__addConfigToOptimParams____main.R

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

addConfigToOptimParams <- function(optimParams, fittingFunction, gradientFunction, sigmaThetaExprList) {
  optimParams$method <- addMethodIfMissing(optimParams)
  optimParams$fn <- fittingFunction
  optimParams$gr <- gradientFunction

  optimParams <- setLowerAndUpperIfExists(optimParams, sigmaThetaExprList)
  optimParams <- setDefaultOrderToPar(optimParams, sigmaThetaExprList)

  return(optimParams)
}