矩陣LU分解求逆詳細分析與C語言實現(xiàn)_第1頁
矩陣LU分解求逆詳細分析與C語言實現(xiàn)_第2頁
矩陣LU分解求逆詳細分析與C語言實現(xiàn)_第3頁
矩陣LU分解求逆詳細分析與C語言實現(xiàn)_第4頁
矩陣LU分解求逆詳細分析與C語言實現(xiàn)_第5頁
已閱讀5頁,還剩8頁未讀, 繼續(xù)免費閱讀

下載本文檔

版權說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權,請進行舉報或認領

文檔簡介

1、題目要求給定一個多維矩陣,實現(xiàn)該矩陣的求逆運算。1、理論分析矩陣的一種有效而廣泛應用的分解方法是矩陣的LU三角分解,將一個n階矩陣A分解為一個下三角矩陣L和一個上三角矩陣U的乘積。所以首先對矩陣進行三角分解,這里采用Doolittle分解,即分解為一個下三角矩陣(對角元素為1),和一個上三角矩陣的乘積。再進行相應的處理。所以,矩陣求逆的算法流程可表述如下:圖1 矩陣求逆流程圖1)進行LU分解;2)對分解后的L陣(下三角矩陣)和U陣(上三角矩陣)進行求逆;;3)L陣的逆矩陣和U陣的逆矩陣相乘,即可求得原來矩陣的逆。即: (1)1.1矩陣的LU 分解若n階方陣 的各階順序主子式不等于零,即: (2

2、)則A的LU分解存在且唯一。 (3)由矩陣的乘法原理, 可推導出LU分解的迭代算法(4) (5) (6) (7)矩陣的LU分解是一個循環(huán)迭代的過程, U矩陣是從第1行迭代到第n行, 而L矩陣則是從第1列迭代到第n列, 且U矩陣先于L矩陣一個節(jié)拍。1.2 L矩陣和U矩陣求逆首先假設下三角矩陣L的逆矩陣為,不失一般性,考慮4階的情況,利用,有:(1) ,;(2)(3)(4)。從而求得下三角矩陣L的逆矩陣R式如下:, (8)上三角矩陣U的逆矩陣可以由下式得到:。, (9)矩陣求逆是一個迭代的過程,依次循環(huán), 迭代次, 求出整個逆矩陣。其中U矩陣的循環(huán)迭代時按行順序,列倒序進行,L矩陣的循環(huán)迭代按列順

3、序,行順序進行,直到計算出整個矩陣的所有結(jié)果為止。1.3 矩陣相乘上三角矩陣U的逆矩陣u與下三角矩陣L的逆矩陣相乘, 最終得到原始矩陣A的逆矩陣, 完成整個矩陣求逆的過程。對于n階矩陣相乘的迭代形式可表示如下: (10)1.4 實例分析例:給定一4階矩陣,通過LU分解求逆矩陣。解:算法過程為:,第一步:求LU矩陣設,通過(4)(7)式可逐步進行矩陣L和U中元素的計算,如下所示:經(jīng)迭代計算,最后得到L和U矩陣為:第二步:求L和U矩陣的逆,(1)求U矩陣的逆由式(9)可得矩陣U的逆的各元素計算如下:(2)求L矩陣的逆由(8)式可得L矩陣的逆的各元素計算如下所以得到L和U的逆矩陣為:(3)求A的逆矩

4、陣由式(10)可計算得到矩陣A的逆,如下:由程序計算出的結(jié)果如下:2、C語言程序設計及測試2.1 算法c程序?qū)崿F(xiàn)13#include#include #define N 4void main() float aNN; float LNN,UNN,outNN, out1NN; float rNN,uNN; 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); int n=N; int

5、 k,i,j; int flag=1; float s,t; /input a matrix/ printf(ninput A=); for(i=0;in;i+) for(j=0;jn;j+) scanf(%f,&aij);/figure the input matrix/printf(輸入矩陣:n);for(i=0;in;i+)for (j = 0; j n; j+)printf(%lf , aij);printf(n);for(j=0;jn;j+) a0j=a0j; /計算U矩陣的第一行 for(i=1;in;i+) ai0=ai0/a00; /計算L矩陣的第1列 for(k=1;kn;k

6、+) for(j=k;jn;j+) s=0; for (i=0;ik;i+) s=s+aki*aij; /累加 akj=akj-s; /計算U矩陣的其他元素 for(i=k+1;in;i+) t=0; for(j=0;jk;j+) t=t+aij*ajk; /累加 aik=(aik-t)/akk; /計算L矩陣的其他元素 for(i=0;in;i+) for(j=0;jj) Lij=aij; Uij=0;/如果ij,說明行大于列,計算矩陣的下三角部分,得出L的值,U的/為0 else Uij=aij; if(i=j) Lij=1; /否則如果ij,說明行小于列,計算矩陣的上三角部分,得出U的/

7、值,L的為0 else Lij=0; if(U11*U22*U33*U44=0) flag=0; printf(n逆矩陣不存在); if(flag=1) /求L和U矩陣的逆 for (i=0;i=0;k-)s=0;for (j=k+1;j=i;j+)s=s+Ukj*uji;uki=-s/Ukk;/迭代計算,按列倒序依次得到每一個值,for (i=0;in;i+) /求矩陣L的逆 rii=1; /對角元素的值,直接取倒數(shù),這里為1for (k=i+1;kn;k+)for (j=i;j=k-1;j+)rki=rki-Lkj*rji; /迭代計算,按列順序依次得到每一個值/繪制矩陣LU分解后的L和U

8、矩陣/ printf(nLU分解后L矩陣:); for(i=0;in;i+) printf(n); for(j=0;jn;j+) printf( %lf,Lij); printf(nLU分解后U矩陣:); for(i=0;in;i+) printf(n); for(j=0;jn;j+) printf( %lf,Uij); printf(n); /繪制L和U矩陣的逆矩陣 printf(nL矩陣的逆矩陣:); for(i=0;in;i+) printf(n); for(j=0;jn;j+) printf( %lf,rij); printf(nU矩陣的逆矩陣:); for(i=0;in;i+) pr

9、intf(n); for(j=0;jn;j+) printf( %lf,uij); printf(n); /驗證將L和U相乘,得到原矩陣 printf(nL矩陣和U矩陣乘積n); for(i=0;in;i+) for(j=0;jn;j+)outij=0; for(i=0;in;i+) for(j=0;jn;j+) for(k=0;kn;k+) outij+=Lik*Ukj; for(i=0;in;i+) for(j=0;jn;j+) printf(%lft,outij); printf(rn); /將r和u相乘,得到逆矩陣 printf(n原矩陣的逆矩陣:n); for(i=0;in;i+) for(j

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
  • 4. 未經(jīng)權益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負責。
  • 6. 下載文件中如有侵權或不適當內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論