Jacobi迭代
function [ x ] = jacobi( A,b,ep,N,x0 )
% JACOBI 用矩阵形式迭代的过程
% A是系数矩阵 B是常数项 ep是精度要求 N是迭代次数
format long %计算结果显示小数点后更多位数
if nargin<3
disp('输入参数数目不足3个')
return
else if nargin>=5
M=N;
end
end
D=diag(diag(A));
L=-tril(A,-1);
U=D-L-A;
B=D\(L+U);
f=D\b;
x=B*x0+f; %第一次迭代
disp(['第1次收敛结果为最终收敛结果:'])
disp(x')
n=2;
while n<M
x0=x;
x=B*x0+f;
if norm(x-x0)<ep
disp(['第',num2str(n),'次收敛结果为最终收敛结果:'])
disp(x')
break
end
disp(['第',num2str(n),