function btnCalcular_Callback(hObject, eventdata, handles)
f=get(handles.edit1,'string');
x0=str2double(get(handles.edit2,'string'));%
x1=str2double(get(handles.edit3,'string'));
tol=str2double(get(handles.edit4,'string'));
syms x;
ea(1)=100;
set(handles.tabla,'Data',{})
hold off
cla
set(handles.tabla,'Data',{})
set(handles.respuesta,'string','No hay raiz');
i=1;
while abs(ea)>tol;
x=x0;
g=eval(f);
x=x1;
gg=eval(f);
xi=x1-((gg*(x0-x1))/(g-gg));
ea=abs((xi-x1)/xi)*100;
x0=x1;
x1=xi;
% Mostrara datos en tabla
newRow ={i,x xi,ea};
oldData = get(handles.tabla,'Data');
newData=[oldData; newRow];
set(handles.tabla,'Data',newData)
i=i+1;
end
respuesta=sprintf('%0.6f',xi);
set(handles.respuesta,'string',respuesta);
%Grafica de la funcion
hold off
fplot(handles.axes1,f,[0 xi+1]);
grid on;
hold on;
zoom on
function btnLimpiar_Callback(hObject, eventdata, handles)
cla %limpiar tabla
set(handles.tabla,'Data',{})
%limpiar textboxs
set(handles.edit1,'string','');
set(handles.edit2,'string','');
set(handles.edit3,'string','');
set(handles.edit4,'string','');
set(handles.respuesta,'string','');
Método de la Secante
0 comments:
Publicar un comentario