R/cov_clm__fitThetaModel__getSigmaTheta.R

Defines functions getSigmaTheta

getSigmaTheta <- function(optimObject, sigmaThetaExprList) {
  sigmaTheta <- evalSigmaThetaExprList(sigmaThetaExprList, as.list(optimObject$par))

  return(sigmaTheta)
}
phmpacheco-ufjf/clm documentation built on Dec. 22, 2021, 8:40 a.m.