Octave - Calcular raiz pelo método de Newton
Publicado por Daniel Moreira dos Santos (última atualização em 15/07/2010)
[ Hits: 23.012 ]
Homepage: http://www.danielmoreira.wordpress.com
Em análise numérica, o método de Newton (ou método de Newton-Raphson) tem o objetivo de estimar as raízes de uma função. Para isso, toma-se um ponto qualquer da função, calcula-se a equação da tangente (derivada) da função nesse ponto, calcula-se o intercepto da tangente ao eixo das abcissas, calcula-se o valor da função nesse ponto, e repete-se o processo, que deve tender a uma das raízes da função rapidamente, ou não tender a nada, deixando isso claro logo.
function [Raiz,Iter,Erro] = Newton_Raiz(funcao,x0,Toler,IterMax);
%parametros de entrada: funcao,x0,Toler,IterMax -> funcao, valor inicial,
%tolerancia e num. max. de iteracoes
%parametros de saida: Raiz,Iter,Erro-> raiz, num. gasto de iteracoes e
%cond. de erro
x = x0;
Fx = eval(funcao);
DFx = eval(diff(funcao));
Iter = 0;
disp(' Iter x DFx Fx DeltaX');
disp([Iter x DFx Fx ]);
while (1)
DeltaX = -Fx/DFx;
x = x+DeltaX;
Fx = eval(funcao);
DFx = eval(diff(funcao));
Iter = Iter+1;
disp([Iter x DFx Fx DeltaX]);
if(abs(DeltaX)<Toler && abs(Fx)<Toler)||abs(DFx)==0 || Iter>= IterMax
break;
end
end
Raiz = x;
if abs(Fx)<Toler
Erro = 0;
else
Erro =1;
end
y = [];
for x=0.001:0.001:10
y = [y,eval(funcao)];
end
x = 0.001:0.001:10;
plot(x,y);
end
Função Fatorial Recursiva em Fortran 95
Octave - Calcular raiz pelo método Regula-Falsi
Matriz de Hilbert e resolução de sistemas lineares
Script em Bath "DOS" para Upload e Download de arquivos usando o SSH
Nenhum comentário foi encontrado.
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Linux em 2025: Segurança prática para o usuário
Desktop Linux em alta: novos apps, distros e privacidade marcam o sábado
IA chega ao desktop e impulsiona produtividade no mundo Linux
Novos apps de produtividade, avanços em IA e distros em ebulição agitam o universo Linux
Como instalar o repositório do DBeaver no Ubuntu
Como instalar o Plex Media Server no Ubuntu
Digitando underscore com "shift" + "barra de espaços"
Como ativar a lixeira e recuperar aquivos deletados em um servidor Linux
Como mudar o nome de dispositivos Bluetooth via linha de comando
Problemas com Driver NVIDIA (1)
Programa fora de escala na tela do pc (21)
Fedora KDE plasma 42 X Módulo de segurança BB (Warsaw-2) (1)









