下載本文檔
版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進行舉報或認領(lǐng)
文檔簡介
1、 常微分方程組的四階Runge-Kutta方法1.問題:1.1若用普通方法-僅適用于兩個方程組成的方程組編程實現(xiàn):創(chuàng)建M 文件:function R = rk4(f,g,a,b,xa,ya,N)%UNTITLED2 Summary of this function goes here% Detailed explanation goes here%x'=f(t,x,y) y'=g(t,x,y)%N為迭代次數(shù)%h為步長%ya,xa為初值f=(t,x,y)(2*x-0.02*x*y);g=(t,x,y)(0.0002*x*y-0.8*y);h=(b-a)/N;T=zeros(1,N
2、+1);X=zeros(1,N+1);Y=zeros(1,N+1);T=a:h:b;X(1)=xa;Y(1)=ya;for j=1:Nf1=feval(f,T(j),X(j),Y(j);g1=feval(g,T(j),X(j),Y(j);f2=feval(f,T(j)+h/2,X(j)+h/2*f1,Y(j)+g1/2);g2=feval(g,T(j)+h/2,X(j)+h/2*f1,Y(j)+h/2*g1);f3=feval(f,T(j)+h/2,X(j)+h/2*f2,Y(j)+h*g2/2);g3=feval(g,T(j)+h/2,X(j)+h/2*f2,Y(j)+h/2*g2);f4=
3、feval(f,T(j)+h,X(j)+h*f3,Y(j)+h*g3);g4=feval(g,T(j)+h,X(j)+h*f3,Y(j)+h*g3);X(j+1)=X(j)+h*(f1+2*f2+2*f3+f4)/6;Y(j+1)=Y(j)+h*(g1+2*g2+2*g3+g4)/6;R=T' X' Y'end情況一:對于x0=3000,y0=120控制臺中輸入:>> rk4('f','g',0,10,3000,120,10)運行結(jié)果:ans =1.0e+003 *0 3.0000 0.12000.0010 2.6637 0.
4、09260.0020 3.7120 0.07740.0030 5.5033 0.08860.0040 4.9866 0.11930.0050 3.1930 0.11950.0060 2.7665 0.09510.0070 3.6543 0.07990.0080 5.2582 0.08840.0090 4.9942 0.11570.0100 3.3541 0.1185數(shù)據(jù):情況二:對于x0=5000,y0=100命令行中輸入:>> rk4('f','g',0,10,5000,100,10)運行結(jié)果:ans =1.0e+003 *0 5.0000 0.1
5、0000.0010 4.1883 0.11440.0020 3.2978 0.10720.0030 3.3468 0.09220.0040 4.2020 0.08760.0050 4.8807 0.09950.0060 4.2090 0.11260.0070 3.3874 0.10690.0080 3.4011 0.09340.0090 4.1568 0.08890.0100 4.7753 0.0991數(shù)據(jù):結(jié)論:無論取得初值是哪一組,捕食者與被捕食者的數(shù)量總是一個增長另一個減少,并且是以T=5 為周期交替增長或減少的。這說明了捕食者與被捕食者是對立的,一個增長則另一個必定減少,從而達到食物鏈
6、相對穩(wěn)定。1.2改進方法-一般方法代碼:創(chuàng)建M 文件:function x=rk4(f,x0,h,a,b,N)%x0初值%(a,b)為迭代區(qū)間%N迭代次數(shù)t=a:h:b;t=zeros(1:N+1);x(:,1)=x0;for i=1:N+1L1=f(t(i),x(:,i);L2=f(t(i)+h/2,x(:,i)'+(h/2)*L1);L3=f(t(i)+h/2,x(:,i)'+(h/2)*L2);L4=f(t(i)+h,x(:,i)'+h*L3);x(:,i+1)=x(:,i)'+(h/6)*(L1+2*L2+2*L3+L4);end以第一組數(shù)據(jù)為例:對于x0=3000,y0=120控制臺中輸入:f=(t,x)2*x(1)-0.02*x(1)*x(2),0.0002*x(1)*x(2)-0.8*x(2);x0=3000,120;N=10;a=0;b=10;rk4(f,x0,a,b,10)運行結(jié)果:ans =1.0e+003 *Columns 1 through 93.0000 2.6637 3.7120 5.5033 4.9866 3.1930 2.7665 3.6543 5.25820.1200 0.0926 0.0774 0.0886 0.1193 0.1195 0.0951 0.0799 0.0884Columns 1
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 二零二五版美容院美容院設(shè)備升級改造合同4篇
- 二零二五年度金融服務(wù)客戶免責(zé)條款3篇
- 2025年度酒店客房銷售旺季保障協(xié)議3篇
- 2025年度個人房產(chǎn)買賣合同風(fēng)險評估與管理合同樣本3篇
- 2025年度汽車租賃與保險產(chǎn)品定制開發(fā)合同4篇
- 淺基坑施工方案
- 二零二五年度航空航天器制造合同:典型合同“質(zhì)量與安全保證合同”4篇
- 博士答辯報告模板
- 2025年度汽車貸款擔(dān)保合同風(fēng)險評估報告4篇
- 語文閱讀課程設(shè)計
- 中國大百科全書(第二版全32冊)08
- 初中古詩文言文背誦內(nèi)容
- 天然氣分子篩脫水裝置吸附計算書
- 檔案管理項目 投標(biāo)方案(技術(shù)方案)
- 蘇教版六年級上冊100道口算題(全冊完整版)
- 2024年大學(xué)試題(宗教學(xué))-佛教文化筆試考試歷年典型考題及考點含含答案
- 計算機輔助設(shè)計智慧樹知到期末考試答案章節(jié)答案2024年青島城市學(xué)院
- 知識庫管理規(guī)范大全
- 電腦耗材實施方案、供貨方案、售后服務(wù)方案
- 環(huán)衛(wèi)項目年終工作總結(jié)
- 弘揚教育家精神爭做四有好老師心得10篇
評論
0/150
提交評論