Displaying 1 result from an estimated 1 matches for "nlm2".
Did you mean:
nlm
2000 Mar 06
1
nlm and optional arguments
...but I could easily
be wrong.)
Here's a hack in R code that works for me (basically copying the R code
of nlm() but defining a temporary function that passes the optional
arguments to the objective function), but I presume this would be cleaner
and faster if implemented at a lower level ...
nlm2 <- function(f, p, hessian=FALSE, typsize=rep(1,length(p)),
fscale=1, print.level=0, ndigit=12, gradtol=1e-6,
stepmax=max(1000 * sqrt(sum((p/typsize)^2)), 1000),
steptol=1e-6, iterlim=100, check.analyticals=TRUE, ...) {
tmpf <- function(x) {...