Ingeniería

CÓDIGO EN MATLAB DE METODO DE LA SECANTE.

function a =secante(fun,x0,x1,tol,maxiter)
% Aproxima por el método de la secante una raiz de la ecuacionfun(x)=0


%cercana a x0, tomando como criterio de parada abs(fun(x))<tol o %la cota sobre el numero deiteraciones dada por maxiter.

% Variables de entrada:
% fun: funcion a calcular la raiz, se introduce en modo simbolico 'fun'
%x0, x1: estimaciones iniciales para el proceso de iteración
% tol: tolerancia en error absoluto para la raiz
% maxiter: maximo numero de iteracionespermitidas
%
% Variables de salida:
% a: valor aproximado de la raíz

fprintf(1, 'Metodo de la secante \n');f0=subs(fun,x0);

f1=subs(fun,x1);

iter=1;while(abs(f1)>tol) & (iter<maxiter)

a = x1-f1*((x1-x0)/(f1-f0)); % formula de iteracion

f0=f1; f1=subs(fun,a); %Actualiza f0 y f1fprintf(1, 'iter= %i, a= %x0,f= %e \n', iter,a ,f1)

iter = iter + 1; % Cuenta los pasosx0=x1; x1=a; % actualiza x

end % Salida


</code>

clc
clearf=input('Ingrese la funcion:\n','s');;
f=inline(f);
x0=input('Ingrese el primer punto inicial:\n');;
x1=input('Ingrese el...