雅可比和SOR超松弛迭代法matlab程序.rar

雅可比和SOR超松弛迭代法matlab程序.rar

%---雅克比迭代法-----
%---Jacobi iteration method
clear;clc;
% A=[10-1-2;-110-2;-1-15];
% b=[728342]‘;
A=[ 28-3000;
    -338-100-5;
    -10025-150;
    00-15450;
    0-50030];
b=[100000]‘;
N=length（b）;
fprintf（‘库函数计算结果：‘）;
x=inv（A）*b   %库函数计算结果
B=zeros（NN）;g=zeros（N1）;
x=zeros（N1）;%迭代初始值
eps=0.001;%相邻解的距离小于该数时，结束迭代
% for i=1:N
%     B（i:）=-A（i:）/A（ii）;
%     B（ii）=0;       %迭代矩阵
%     g（i）=b（i）/A（ii）;
% end
D=diag（diag（A））;
E=-tril（A-1）;%下三角
F=-triu（A1）;%上三角
B=inv（D）*（E+F）;g=inv（D）*b;
for k=1:100 %最大迭代次数为100
    fprintf（‘第%d次迭代：‘k）;
    y=B*x+g;
    fprintf（‘\n与上次计算结果的距离（2范数）:%f \n‘norm（x-y）^2）;
    if norm（x-y）        break;
    end
    x=y
end
x

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        813  2020-06-10 22:23  程序\Jacobi.m

     文件        636  2020-06-10 22:34  程序\SOR.m

     文件        606  2020-06-10 22:49  程序\SOR1.m

     目录          0  2020-06-10 23:04  程序

----------- ---------  ---------- -----  ----

                 2055                    4