?? jacobi.m
字號(hào):
function [y,n]=jacobi(A,b,x0,eps)
if nargin==3
eps=1.0e-6;
elseif nargin<3
error
return
end
D=diag(diag(A)); %求A的對(duì)角矩陣
L=-tril(A,-1); %求A的下三角陣
U=-triu(A,1); %求A的上三角陣
B=D\(L+U);
f=D\b;
y=B*x0+f;
n=1; %迭代次數(shù)
while norm(y-x0)>=eps
x0=y;
y=B*x0+f;
n=n+1;
end
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -