Métodos numéricos - Método de la regla falsa en Matlab

Este metodo sirve para encontrar la raiz o solucion real de una ecuacion. Al decir que encuentra su resultado hay que tomar en cuenta que no todas las ecuaciones tienen un solo resultado, y que no todas tienen resultado, por lo que hay que tener una idea de la forma de la curva de la ecuacion antes de aplicar el metodo para que sea efectivo.

% Método de la regla falsa
function raiz=Rfalsa(fdex2,i,s,error)
%error=0.01;
j=1;
fa=feval(fdex2,i);
fb=feval(fdex2,s);
r = (((i*fb)-(s*fa))/(fb-fa));
fr = feval(fdex2,r);
if fa*fb < ep =" 100;" ant="0;"> error

fa=feval(fdex2,i);
fb=feval(fdex2,s);
r = (((i*fb)-(s*fa))/(fb-fa));
fr = feval(fdex2,r);
fab = fa * fr;
ep = abs((r - ant) / r) *100;

fprintf('%5d %10.6f %10.6f %10.6f %10.6f %10.6f %10.6f %10.6f \n',j,i,r,s,fa,fr,fb,ep);
ant=r;
j=j+1;

if fa*fr<0 s="r;" i="r;">