R/solver.r

Defines functions solver

Documented in solver

#' @title solver
#' @description unknown
#' @family abysmally documented
#' @author  unknown, \email{<unknown>@@dfo-mpo.gc.ca}
#' @export
solver = function(pars,fn,hess=TRUE,...)
{
  fit = optim(pars,fn,hessian=hess,...)
  if(hess){
    fit$VarCov = solve(fit$hessian)             #Variance-Covariance
    fit$SDs = sqrt(diag(fit$V))                 #Standard deviations
    fit$Correlations = fit$V/(fit$S %o% fit$S)  #Parameter correlation
  }            
  return(fit)
}
AtlanticR/bio.utilities documentation built on June 21, 2020, 7:43 p.m.