| 查看: 847 | 回复: 0 | ||
[求助]
求助详细讲解下述程序 三对角矩阵方程追赶法
|
|
function x=followup(A,b) %采用追赶法求线性方程组Ax=b的解 %线性方程组的系数矩阵:A %线性方程组中的常数向量:b %线性方程组的解:x n=rank(A); for(i=1:n) if(A(i,i)==0) disp('Error:对角所有元素为0!'); return; end end; d=ones(n,1); a=ones(n-1,1); c=ones(n-1); for(i=1:n-1) a(i,1)=A(i+1,i); c(i,1)=A(i,i+1); d(i,1)=A(i,i); end d(n,1)=A(n,n); %求解Ly=b的解y,解保存在b中 for(i=2:n) d(i,1)=d(i,1)-(a(i-1,1)/d(i-1,1))*c(i-1,1); b(i,1)=b(i,1)-(a(i-1,1)/d(i-1,1))*b(i-1,1); end %求解Ux=y的解x x(n,1)=b(n,1)/d(n,1); for(i=(n-1):-1:1) x(i,1)=(b(i,1)-c(i,1)*x(i+1,1))/d(i,1); end |
» 猜你喜欢
关于豆爷回答的JTJC与%2F数量
已经有4人回复
基金中了
已经有11人回复
filecode
已经有18人回复
听说今天filecode变了
已经有44人回复
固定端突然变了,今天
已经有8人回复
filecode
已经有11人回复
大家散了吧,后缀研究没有意义,别浪费时间了,过好目前的每一天,不要焦虑
已经有6人回复
一个有机合成实验室都需要哪些设备?
已经有12人回复
求各位大神看下
已经有33人回复
咨询面上基金
已经有7人回复










回复此楼
50