高斯消元法MATLAB實(shí)現(xiàn)_第1頁
高斯消元法MATLAB實(shí)現(xiàn)_第2頁
高斯消元法MATLAB實(shí)現(xiàn)_第3頁
高斯消元法MATLAB實(shí)現(xiàn)_第4頁
高斯消元法MATLAB實(shí)現(xiàn)_第5頁
已閱讀5頁,還剩2頁未讀, 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡介

..《數(shù)值分析》實(shí)驗(yàn)報(bào)告實(shí)驗(yàn)五______成績:一、實(shí)驗(yàn)?zāi)康呐c要求1.掌握高斯消去法的基本思路和迭代步驟;2.培養(yǎng)編程與上機(jī)調(diào)試能力。二、實(shí)驗(yàn)內(nèi)容1.編寫用高斯消元法解線性方程組的MATLAB程序,并求解下面的線性方程組,然后用逆矩陣解方程組的方法驗(yàn)證.〔1〔22.編寫用列主元高斯消元法解線性方程組的MATLAB程序,并求解下面的線性方程組,然后用逆矩陣解方程組的方法驗(yàn)證.〔1〔2三.MATLAB計(jì)算源程序1.用高斯消元法解線性方程組的MATLAB程序輸入的量:系數(shù)矩陣和常系數(shù)向量;輸出的量:系數(shù)矩陣和增廣矩陣的秩RA,RB,方程組中未知量的個(gè)數(shù)n和有關(guān)方程組解及其解的信息.function[RA,RB,n,X]=gaus<A,b>B=[Ab];n=length<b>;RA=rank<A>;RB=rank<B>;zhica=RB-RA;ifzhica>0,disp<'請(qǐng)注意:因?yàn)镽A~=RB,所以此方程組無解.'>returnendifRA==RBifRA==ndisp<'請(qǐng)注意:因?yàn)镽A=RB=n,所以此方程組有唯一解.'>X=zeros<n,1>;C=zeros<1,n+1>;forp=1:n-1fork=p+1:nm=B<k,p>/B<p,p>;B<k,p:n+1>=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<'請(qǐng)注意:因?yàn)镽A=RB<n,所以此方程組有無窮多解.'>EndEnd2.列主元消元法及其MATLAB程序用列主元消元法解線性方程組的MATLAB程序輸入的量:系數(shù)矩陣和常系數(shù)向量;輸出的量:系數(shù)矩陣和增廣矩陣的秩RA,RB,方程組中未知量的個(gè)數(shù)n和有關(guān)方程組解及其解的信息.function[RA,RB,n,X]=liezhu<A,b>B=[Ab];n=length<b>;RA=rank<A>;RB=rank<B>;zhica=RB-RA;ifzhica>0,disp<'請(qǐng)注意:因?yàn)镽A~=RB,所以此方程組無解.'>returnendifRA==RBifRA==ndisp<'請(qǐng)注意:因?yàn)镽A=RB=n,所以此方程組有唯一解.'>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>=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<'請(qǐng)注意:因?yàn)镽A=RB<n,所以此方程組有無窮多解.'>endend實(shí)驗(yàn)過程:1〔1編寫高斯消元法的MATLAB文件如下:clear;A=[0.1012.3043.555;-1.3473.7124.623;-2.8351.0725.643];b=[1.183;2.137;3.035];[RA,RB,n,X]=gaus<A,b>運(yùn)行結(jié)果為:請(qǐng)注意:因?yàn)镽A=RB=n,所以此方程組有唯一解.RA=3RB=3n=3X=-0.39820.01380.3351〔2編寫高斯消元法MATLAB文件如下:clear;A=[521;28-3;1-3-6];b=[8;21;1;];[RA,RB,n,X]=gaus<A,b>運(yùn)行結(jié)果為:請(qǐng)注意:因?yàn)镽A=RB=n,所以此方程組有唯一解.RA=3RB=3n=3X=12-1在MATLAB中利用逆矩陣法檢驗(yàn)結(jié)果:<1>在commandwindows中直接運(yùn)行命令:A=[0.1012.3043.555;-1.3473.7124.623;-2.8351.0725.643];b=[1.183;2.137;3.035];X=A\b運(yùn)行結(jié)果為:X=-0.39820.01380.3351<2>在commandwindows中直接運(yùn)行命令:A=[521;28-3;1-3-6];b=[8;21;1;];X=A\b運(yùn)行結(jié)果為:X=12-1兩小題所得結(jié)果相同,檢驗(yàn)通過2〔1編寫列組高斯消元法MATLAB文件如下:clear;A=[0.1012.3043.555;-1.3473.7124.623;-2.8351.0725.643];b=[1.183;2.137;3.035];[RA,RB,n,X]=liezhu<A,b>運(yùn)行結(jié)果:請(qǐng)注意:因?yàn)镽A=RB=n,所以此方程組有唯一解.RA=3RB=3n=3X=-0.39820.01380.3351〔2編寫列組高斯消元法的MATLAB文件如下:clear;A=[521;28-3;1-3-6];b=[8;21;1;][RA,RB,n,X]=liezhu<A,b>運(yùn)行結(jié)果為:請(qǐng)注意:因?yàn)镽A=RB=n,所以此方程組有唯一解.RA=3RB=3n=3X=12-1與題1中逆矩陣計(jì)算所得結(jié)果相同,檢驗(yàn)通過

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(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ì)自己和他人造成任何形式的傷害或損失。

最新文檔

評(píng)論

0/150

提交評(píng)論