Displaying 4 results from an estimated 4 matches for "zeroin2".
Did you mean:
zeroing
2018 Jul 30
2
trace in uniroot() ?
...,
## numerically, f(-|M|) becomes zero :
u3 <- uniroot(exp, c(0,2), extendInt="yes", trace=TRUE)
)
When extendInt is set, then there is some information output, but trace alone
produces nothing.
I looked at the source code -- it is in R-3.5.1/src/library/stats/R/nlm.R and
calls zeroin2 code from R-3.5.1/src/library/stats/src/optimize.c as far as I
can determing. My code inspection suggests trace does not show the iterations
of the rootfinding, and only has effect when the search interval is allowed
to be extended. It does not appear that there is any mechanism to ask
the zeroin2...
2018 Aug 13
1
trace in uniroot() ?
...uniroot(exp, c(0,2), extendInt="yes", trace=TRUE)
> )
>
> When extendInt is set, then there is some information output, but trace alone
> produces nothing.
>
> I looked at the source code -- it is in R-3.5.1/src/library/stats/R/nlm.R and
> calls zeroin2 code from R-3.5.1/src/library/stats/src/optimize.c as far as I
> can determing. My code inspection suggests trace does not show the iterations
> of the rootfinding, and only has effect when the search interval is allowed
> to be extended. It does not appear that there is any me...
2018 Aug 13
0
trace in uniroot() ?
...u3 <- uniroot(exp, c(0,2), extendInt="yes", trace=TRUE)
> )
>
> When extendInt is set, then there is some information output, but trace
> alone
> produces nothing.
>
> I looked at the source code -- it is in R-3.5.1/src/library/stats/R/nlm.R
> and
> calls zeroin2 code from R-3.5.1/src/library/stats/src/optimize.c as far
> as I
> can determing. My code inspection suggests trace does not show the
> iterations
> of the rootfinding, and only has effect when the search interval is allowed
> to be extended. It does not appear that there is any mech...
2011 Apr 03
1
How do I modify uniroot function to return .0001 if error ?
...;lower < upper is not fulfilled")
if (is.na(f.lower))
stop("f.lower = f(lower) is NA")
if (is.na(f.upper))
stop("f.upper = f(upper) is NA")
if (f.lower * f.upper > 0)
stop("f.up * f.down > 0")
val <- .Internal(zeroin2(function(arg) f(arg, ...), lower,
upper, f.lower, f.upper, tol, as.integer(maxiter)))
iter <- as.integer(val[2L])
if (iter < 0) {
warning("_NOT_ converged in ", maxiter, " iterations")
iter <- maxiter
}
list(root = val[1L], f.roo...