版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
PAGEPAGE5第二步:求L和U矩阵的逆,(1)求U矩阵的逆由式(9)可得矩阵U的逆的各元素计算如下:(2)求L矩阵的逆由(8)式可得L矩阵的逆的各元素计算如下所以得到L和U的逆矩阵为:(3)求A的逆矩阵由式(10)可计算得到矩阵A的逆,如下:由程序计算出的结果如下:2、C语言程序设计及测试2.1算法c程序实现#include<stdio.h>#include<string.h>#defineN4voidmain(){floata[N][N];floatL[N][N],U[N][N],out[N][N],out1[N][N];floatr[N][N],u[N][N];memset(a,0,sizeof(a));memset(L,0,sizeof(L));memset(U,0,sizeof(U));memset(r,0,sizeof(r));memset(u,0,sizeof(u));intn=N;intk,i,j;intflag=1;floats,t;////////////////////inputamatrix////printf("\ninputA=");for(i=0;i<n;i++)for(j=0;j<n;j++)scanf("%f",&a[i][j]);//////////////////figuretheinputmatrix//////////////////////////printf("输入矩阵:\n");for(i=0;i<n;i++){ for(j=0;j<n;j++) { printf("%lf",a[i][j]); } printf("\n");}for(j=0;j<n;j++)a[0][j]=a[0][j];//计算U矩阵的第一行for(i=1;i<n;i++)a[i][0]=a[i][0]/a[0][0];//计算L矩阵的第1列for(k=1;k<n;k++){for(j=k;j<n;j++){s=0;for(i=0;i<k;i++)s=s+a[k][i]*a[i][j];//累加a[k][j]=a[k][j]-s;//计算U矩阵的其他元素}for(i=k+1;i<n;i++){t=0;for(j=0;j<k;j++)t=t+a[i][j]*a[j][k];//累加a[i][k]=(a[i][k]-t)/a[k][k];//计算L矩阵的其他元素}}for(i=0;i<n;i++)for(j=0;j<n;j++){if(i>j){L[i][j]=a[i][j];U[i][j]=0;}//如果i>j,说明行大于列,计算矩阵的下三角部分,得出L的值,U的//为0else{U[i][j]=a[i][j];if(i==j)L[i][j]=1;//否则如果i<j,说明行小于列,计算矩阵的上三角部分,得出U的//值,L的为0elseL[i][j]=0;}}if(U[1][1]*U[2][2]*U[3][3]*U[4][4]==0){ flag=0;printf("\n逆矩阵不存在");}if(flag==1){/////////////////////求L和U矩阵的逆for(i=0;i<n;i++)/*求矩阵U的逆*/{u[i][i]=1/U[i][i];//对角元素的值,直接取倒数for(k=i-1;k>=0;k--){s=0;for(j=k+1;j<=i;j++)s=s+U[k][j]*u[j][i];u[k][i]=-s/U[k][k];//迭代计算,按列倒序依次得到每一个值,}}for(i=0;i<n;i++)//求矩阵L的逆{r[i][i]=1;//对角元素的值,直接取倒数,这里为1for(k=i+1;k<n;k++){for(j=i;j<=k-1;j++)r[k][i]=r[k][i]-L[k][j]*r[j][i];//迭代计算,按列顺序依次得到每一个值}}/////////////////绘制矩阵LU分解后的L和U矩阵///////////////////////printf("\nLU分解后L矩阵:");for(i=0;i<n;i++){printf("\n");for(j=0;j<n;j++)printf("%lf",L[i][j]);}printf("\nLU分解后U矩阵:");for(i=0;i<n;i++){printf("\n");for(j=0;j<n;j++)printf("%lf",U[i][j]);}printf("\n");////////绘制L和U矩阵的逆矩阵printf("\nL矩阵的逆矩阵:");for(i=0;i<n;i++){printf("\n");for(j=0;j<n;j++)printf("%lf",r[i][j]);}printf("\nU矩阵的逆矩阵:");for(i=0;i<n;i++){printf("\n");for(j=0;j<n;j++)printf("%lf",u[i][j]);}printf("\n");//验证将L和U相乘,得到原矩阵printf("\nL矩阵和U矩阵乘积\n");for(i=0;i<n;i++) { for(j=0;j<n;j++) {out[i][j]=0;}}for(i=0;i<n;i++) { for(j=0;j<n;j++) { for(k=0;k<n;k++) {out[i][j]+=L[i][k]*U[k][j];} }}for(i=0;i<n;i++){ for(j=0;j<n;j++) { printf("%lf\t",out[i][j]); }printf("\r\n");}//////////将r和u相乘,得到逆矩阵printf("\n原矩阵的逆矩阵:\n");for(i=0;i<n;i++) { for(j=0;j<n;j++) {out1[i][j]=0;}}for(i=0;i<n;i++) { for(j=0;j<n;j++) { for(k=0;k<n;k++) {out1[i][j]+=u[i][k]*r[k][j];} }}fo
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 二零二四年度购买合同描述与购买价格
- 二零二四年度平房买卖合同(含车位)
- 二零二四年度质押合同(音乐作品)
- 二零二四年度电影拍摄投资合同
- 淋浴房销售安装合同
- 2024年度民间个人借款合同担保范本
- 学校图书馆借阅合同
- 2025届内蒙古赤峰林东第一中学高三第六次模拟考试语文试卷含解析
- 福建省南安三中2025届高考压轴卷数学试卷含解析2
- 贵州省凤冈县二中2025届高考仿真模拟数学试卷含解析
- 《软弱地基处理》课件.ppt
- 手机维修顾客须知
- 路灯工程竣工验收标准表格.docx
- 两台37kW三相交流电动机的动力配电柜设计(共21页)
- 精品资料(2021-2022年收藏)中国邮政工资200810范文
- 先进先出法与后进先出法ppt课件
- 资本运营理论与融资重点整理
- 学生学习习惯家长问卷调查表家长问卷调查表
- 职业暴露及预防控制
- 大连市土地一级开发整理
- 氩气安全技术说明书
评论
0/150
提交评论