?? mulnewton_h.m
字號:
function [r,n]=mulNewton_H(x0,eps)
if nargin==1
eps=1.0e-6;
end
Fx = myfun_H(x0);
dF = detamyfun_H(x0);
r=x0-inv(dF)*Fx;
n=1;
tol=1;
while tol>eps
x0=r;
Fx = myfun_H(x0);
dF = detamyfun_H(x0);
r=x0-inv(dF)*Fx; %核心迭代公式
tol=norm(r-x0);
n=n+1;
if(n>100000) %迭代步數(shù)控制
disp('迭代步數(shù)太多,可能不收斂!');
return;
end
end
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -