matlab雅克比迭代法算例
合集下载
相关主题
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
雅克比迭代法算例子函数:m文件
%雅克比Jacobi.m
function x=Jacobi(A,b,x0,eps,N)%用雅克比迭代法解方程
n=length(b);x=ones(n,1);k=0;
while k<=N
for i=1:n
x(i)=(b(i)-A(i,[1:i-1,i+1:n])*x0([1:i-1,i+1:n]))/A(i,i);
end
k=k+1;
if norm(x-x0,inf) x0=x; end if k>N warning('算法超出迭代的次数'); else disp(['迭代次数= ',num2str(k)]) x end 主程序:(调用以上程序)。M文件 clc format long A=[10,-1,2,0;-1,11,-1,3;2,-1,10,-1;0,3,-1,8]; b=[6;25;-11;15]; x0=[0;0;0;0];eps=1e-6;N=30; x=Jacobi(A,b,x0,eps,N);