Pessoal já tentei e não consegui. Como colocar para exibir os valores das iterações passo a passo? E não só a estimativa da raiz. Já tentei colocar i=NULL para receber as iterações ..ma não consegui.
newtonRaphson <-function (x){
x - ((exp(-x^2) - x^3 + 2) / (-2 * exp(-x^2) - 3 * x^2))
}
x <- 0.5 # valor inicial
old <- 0 # valor anterior
tol <- 0.0001
while (abs(old - x) > tol){
old <- x
x <- newtonRaphson(x) # Repetir se delta x maior tol
}
print(paste("Raiz: ", x))
André Oliveira Souza.
Graduação em Matemática, mestrado em estatística aplicada.Instituto Federal de Educação, Ciência e Tecnologia do Espirito Santo. IFES