![復(fù)數(shù)矩陣求逆運(yùn)算_第1頁(yè)](http://file4.renrendoc.com/view/2a934ebeb5a47b4de7c9182cc54b3816/2a934ebeb5a47b4de7c9182cc54b38161.gif)
![復(fù)數(shù)矩陣求逆運(yùn)算_第2頁(yè)](http://file4.renrendoc.com/view/2a934ebeb5a47b4de7c9182cc54b3816/2a934ebeb5a47b4de7c9182cc54b38162.gif)
![復(fù)數(shù)矩陣求逆運(yùn)算_第3頁(yè)](http://file4.renrendoc.com/view/2a934ebeb5a47b4de7c9182cc54b3816/2a934ebeb5a47b4de7c9182cc54b38163.gif)
![復(fù)數(shù)矩陣求逆運(yùn)算_第4頁(yè)](http://file4.renrendoc.com/view/2a934ebeb5a47b4de7c9182cc54b3816/2a934ebeb5a47b4de7c9182cc54b38164.gif)
下載本文檔
版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、1實(shí)、虛部矩陣均可逆的復(fù):數(shù)矩陣求 逆法諛C是個(gè)八階史數(shù)矩陣,將C寫成C = A 4 加的形式,其中實(shí)部矩陣4,虛部矩陣是越階可逆實(shí) 矩陣.巧由于I =1,朋八T 1 + 8人/尸=(A +出-酒)口4 A)而f ,小 + jmL =(B 1 - iA-+ A) T1 =(ttX - - X) (Bti1) (BXAB +4一)%”二(H-H iA)BlTA8, + A-)B =(1 - iAti)(A 4 ZM廣 =(A * OAO)1 - iA B(A bA-1 U)-1故此,且數(shù)矩陣C的逆矩陣為c1 = (a + 出廠 = (a + 8a .”廠 iAB(A + A)”fl)所以按照以上
2、介紹的方法,用C語(yǔ)言實(shí)現(xiàn)過(guò)程如下: #include ttinclude float getA(float *arcs, int n)按第一行展開計(jì)算|A| (if (n=l)( return arcs00;)int i, j, k;float ans = 0;float *temp = (float *)malloc(sizeof(float *) * n); for(i = 0; i n; i+)temp Li = (float *)malloc(sizeof(float *) * n);)for(i=0;in;i+)(for(j=0;jn-l;j+)(for(k_0;k=i)?k+l:k
3、;float t = getA(temp, n-l);if(i%2=0)(ans +二 arcs0i*t;else(ans -= arcs0i*t;)return ans;)void getAStart (float *arcs, int n,float *ans)(if (n=l)ans00 = 1;return;)int i, j, k, t;float num = getA(arcs, n);float *tcmp = (float *)malloc(sizeof(float *) * n);for(i = 0; i n; i+)tempi = (float *)malloc(sizeo
4、f(float *) * n);)for (i=0;in;i+)(for (j=0;jn;j+)(for (k=0;kn-l;k+)for (t=0;t=i? k+l:k t=j? t+1: t;/找出除第i行第j列的(n-1)矩陣計(jì)算arcsij的余子式計(jì)算arcsij的余子式ansj i = getA(temp, n-l) / num;ansEj i二-ansj i;計(jì)算arcs i j的代數(shù)余子式)void Matrix_Add(float *a, float *b, float *c, int n) 矩陣相加int i, j;for(i = 0; i n; i+) for(j = 0;
5、 j n; j+) )c = a * bvoid Matrix Mul(float *a, float *b, float *c, int n) int i, j, k;for (i = 0;i3;i+)(for(j =0;j3;j+)= 0; 清零for (k = 0;k3;k+) (ci j += ai k*bk j;)void Inverse(float *a, float *b, int n) int i, j;float *c = (float mal1oc(sizeof(float *) * n); for(i = 0; i n; i+)ci = (float )malloc(si
6、zeof(float) * n);)float *d = (float *)malloc(sizeof(float *) * n); for(i _ 0; i n; i+) di = (float )malloc(sizeof(float) * n);)getAStart (a, n, c);求實(shí)部矩陣的逆:C = ATprintf(實(shí)部矩陣的逆:C = ATn); for(i=0;in;i+)for(j=0;jn;j+)printf (z/%0. 5f,z,cij);)printf(n); printf CAn);Matrix Mui (c, b, d, n) ; /D = AT * Bpr
7、intf (實(shí)部矩陣的逆與虛部矩陣相乘:D = A-1 * Bn); for(i=0;in;i+)( for(j=0;jn;j+) (printf (,z%0. 5f) printf (n); printf (/,n,/);Matrix_Mul (b, d, c, n) ; C = B * AT * B printfCC = B * AT * Bn); for (i=0;in;i+) (for(j=0;jn;j+) (printf (z/%0. 5f z,, cij);) printf (n); printf(n);Matrix_Add(a, c, c, n) ; /C = A + B * A
8、-1 * B printfCC = A + B * A-l * Bn);for(i=0;in;i+) (for(j=0;jn;j+) printf (zz%0. 5f z/, cij);) printf(n); printf(n);getAStart (c, n, a) ;/A = (A + B * AT * B)T,復(fù)數(shù)矩陣的求逆后的實(shí)部printf (復(fù)數(shù)矩陣的求逆后的實(shí)部:A -(A + B * B)Tn);for(i=0;in;i+)(for(j=0;jn;j+)printf(n); printf (n);Matrix_Mul(d, a, b, n) ; /B = (AT * B) * (A + B * AT * B)T,復(fù)數(shù)矩陣的求逆后的虛部 printf (復(fù)數(shù)矩陣的求逆后的虛部:B = (A2T * B) * (A + B * AT * B)Tn);for (i=0;in;i+)(for(j=0;jn;j+)printf (z/%0. 5f)printf (rT); printf(n);)void main ()(int i;float *a = (float *)malloc(sizeof(float *) *2);for(i = 0; i 2; i+)ai二(float *)malloc(sizeof(float) * 2);)float *b = (float
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 加油車配送合同范本
- 公司承包轉(zhuǎn)讓合同范本
- 2025年度高新技術(shù)園區(qū)過(guò)橋資金借款申請(qǐng)扶持合同
- 2025年中國(guó)當(dāng)歸行業(yè)發(fā)展趨勢(shì)預(yù)測(cè)及投資戰(zhàn)略咨詢報(bào)告
- 0元租賃合同范例
- 個(gè)人車輛維修合同范例
- 2025年度環(huán)??⒐を?yàn)收跨區(qū)域協(xié)作與支持合同
- 別墅裝修裝飾合同范本
- 買賣小牛犢合同范本
- 農(nóng)村蓋房承攬合同范例
- 歷史時(shí)間軸全
- 2019譯林版高中英語(yǔ)全七冊(cè)單詞總表
- 高速行業(yè)網(wǎng)絡(luò)安全與維護(hù)
- 2024年能源電力行業(yè)數(shù)字化轉(zhuǎn)型解決方案
- (2024年)房地產(chǎn)銷售人員心態(tài)培訓(xùn)
- 康復(fù)科院感年度工作計(jì)劃
- T-BJCC 1003-2024 首店、首發(fā)活動(dòng)、首發(fā)中心界定標(biāo)準(zhǔn)
- 《海洋自然保護(hù)區(qū)》課件
- 2024年云南機(jī)場(chǎng)集團(tuán)飛機(jī)維修服務(wù)分公司招聘筆試參考題庫(kù)含答案解析
- 外科手術(shù)及護(hù)理常規(guī)
- 蘇少版小學(xué)一年級(jí)下冊(cè)綜合實(shí)踐活動(dòng)單元備課
評(píng)論
0/150
提交評(píng)論