…………………………………………………………最最最最最最最最…………………………………………………… …………………………………………………………最最最最最最最最……………………………………………………1 数值分析第五章 第一题: LU分解法: 建立m 文件 function h1=zhijieLU(A,b) %h1 各阶主子式的行列式值 [n n]=size(A);RA=rank(A); if RA~=n disp( '请注意:因为A的n阶行列式h1 等于零,所以A不能进行LU分解
A的秩RA如下:') RA,h1=det(A); return end if RA==n for p=1:n h(p)=det(A(1:p,1:p)); end h1=h(1:n); for i=1:n if h(1,i)==0 disp( '请注意:因为A的r阶主子式等于零,所以A不能进行LU分解
A的秩RA和各阶顺序主子式h1 依次如下:') h1;RA return end end if h(1,i)~=0 disp( '请注意:因为A的r阶主子式都不等于零,所以A能进行LU分解
A的秩RA和各阶顺序主子式h1 依次如下:') for j=1:n U(1,j)=A(1,j); end for k=2:n for i=2:n for j=2:n L(1,1)=1;L(i,i)=1; if i>j L(1,1)=1;L(2,1)=A(2,1)/U(1,1);L(i,1)=A(i,1)/U(1,1); L(i,k)=(A(i,k)-L(i,1:k-1)*U(1:k-1,k))/U(k,k); else U(k,j)=A(k,j)-L(k,1:k-1)*U(1:k-1,j); end end end end h1;RA,U,L, X=i