powered by
fixedpoint(ftn, x0, tol = 1e-09, max.iter = 100)
newtonraphson
bisection
ftn1 <- function(x) return(exp(exp(-x))) fixedpoint(ftn1, 2, tol = 1e-6)
Run the code above in your browser using DataLab