数值分析(第五版)计算实习题第五章作业

数值分析(第五版)计算实习题第五章作业

ID:47517389

大小:32.75 KB

页数:12页

时间:2020-01-12

数值分析(第五版)计算实习题第五章作业_第1页
数值分析(第五版)计算实习题第五章作业_第2页
数值分析(第五版)计算实习题第五章作业_第3页
数值分析(第五版)计算实习题第五章作业_第4页
数值分析(第五版)计算实习题第五章作业_第5页
资源描述:

《数值分析(第五版)计算实习题第五章作业》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、数值分析第五章第一题:LU分解法:建立m文件functionh1=zhijieLU(A,b)%h1各阶主子式的行列式值[nn]=size(A);RA=rank(A);ifRA~=ndisp('请注意:因为A的n阶行列式h1等于零,所以A不能进行LU分解。A的秩RA如下:')RA,h1=det(A);returnendifRA==nforp=1:nh(p)=det(A(1:p,1:p));endh1=h(1:n);fori=1:nifh(1,i)==0disp('请注意:因为A的r阶主子式等于零,所以A不能进行LU分解。A的秩RA和

2、各阶顺序主子式h1依次如下:')h1;RAreturnendendifh(1,i)~=0disp('请注意:因为A的r阶主子式都不等于零,所以A能进行LU分解。A的秩RA和各阶顺序主子式h1依次如下:')forj=1:nU(1,j)=A(1,j);endfork=2:nfori=2:nforj=2:nL(1,1)=1;L(i,i)=1;ifi>jL(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

3、);elseU(k,j)=A(k,j)-L(k,1:k-1)*U(1:k-1,j);endendendendh1;RA,U,L,X=inv(U)*inv(L)*bendend输入:>>A=[10-701;-32.09999962;5-15-1;2102];>>b=[8;5.900001;5;1];>>h1=zhijieLU(A,b)输出:请注意:因为A的r阶主子式都不等于零,所以A能进行LU分解。A的秩RA和各阶顺序主子式h1依次如下:RA=4U=10.0000-7.000001.000002.10006.00002.300000

4、-2.1429-4.23810-0.0000012.7333L=1.0000000-0.30001.0000000.50001.19051.0000-0.00000.20001.14293.20001.0000X=-0.2749-1.32981.29691.4398h1=10.0000-0.0000-150.0001-762.0001列主元高斯消去法:建立m文件function[RA,RB,n,X]=liezhu(A,b)B=[Ab];n=length(b);RA=rank(A);RB=rank(B);zhicha=RB-RA;i

5、fzhicha>0disp('请注意:因为RA~=RB,所以方程组无解')returnwarningoffMATLAB:return_outside_of_loopendifRA==RBifRA==ndisp('请注意:因为RA=RB,所以方程组有唯一解')X=zeros(n,1);C=zeros(1,n+1);forp=1:n-1[Y,j]=max(abs(B(p:n,p)));C=B(p,:);B(p,:)=B(j+p-1,:);B(j+p-1,:)=C;fork=p+1:nm=B(k,p)/B(p,p);B(k,p:n+1)

6、=B(k,p:n+1)-m*B(p,p:n+1);endendb=B(1:n,n+1);A=B(1:n,1:n);X(n)=b(n)/A(n,n);forq=n-1:-1:1X(q)=(b(q)-sum(A(q,q+1:n)*X(q+1:n)))/A(q,q);endelsedisp('请注意:因为RA=RB>A=[10-701;-32.09999962;5-15-1;2102];>>b=[8;5.900001;5;1];>>[RA,RB,n,X]=liezhu(A,b),H=de

7、t(A)输出:请注意:因为RA=RB,所以方程组有唯一解RA=4RB=4n=4X=0.0000-1.00001.00001.0000H=-762.0001第二题:建立列主元高斯消去法m文件(题一中已有)(1)输入:>>formatcompact>>A=[3.016.031.99;1.274.16-1.23;0.987-4.819.34];>>b=[1;1;1];>>[RA,RB,n,X]=liezhu(A,b),h=det(A),C=cond(A)输出:请注意:因为RA=RB,所以方程组有唯一解RA=3RB=3n=3X=1.0e+

8、03*1.5926-0.6319-0.4936h=-0.0305C=3.0697e+04(2)输入:>>A=[3.006.031.99;1.274.16-1.23;0.990-4.819.34];>>b=[1;1;1];>>[RA,RB,n,X]=

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。