- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
经典四阶龙格库塔法解1阶微分方程组
经典四阶龙格库塔法解一阶微分方程组
数值计算课程设计
PAGE \* MERGEFORMAT
PAGE \* MERGEFORMAT 2
PAGE \* MERGEFORMAT
PAGE \* MERGEFORMAT 1
1.经典四阶龙格库塔法解一阶微分方程组
1.1运用四阶龙格库塔法解一阶微分方程组算法分析
(1-1)
(1-1)
(1-2
(1-2)
(1-3
(1-3)
(1-4
(1-4)
(1-5
(1-5)
(1-6
(1-6)
(1-7
(1-7)
(1-8
(1-8)
(1-9
(1-9)
(1-10
(1-10)
经过循环计算由 推得 ……
每个龙格-库塔方法都是由一个合适的泰勒方法推导而来,使得其最终全局误差为,一种折中方法是每次进行若干次函数求值,从而省去高阶导数计算。4阶龙格-库塔方法(RK4)是最常用的,它适用于一般的应用,因为它非常精准,稳定,且易于编程。
1.2经典四阶龙格库塔法解一阶微分方程流程图
图1-1 经典四阶龙格库塔法解一阶微分方程流程图
1.3经典四阶龙格库塔法解一阶微分方程程序代码:
#include iostream
#include iomanip
using namespace std;
void RK4( double (*f)(double t,double x, double y),double (*g)(double t,double x, double y) ,double initial[3], double resu[3],double h)
{
double f1,f2,f3,f4,g1,g2,g3,g4,t0,x0,y0,x1,y1;
t0=initial[0];x0=initial[1];y0=initial[2];
f1=f(t0,x0,y0); g1=g(t0,x0,y0);
f2=f(t0+h/2, x0+h*f1/2,y0+h*g1/2); g2=g(t0+h/2, x0+h*f1/2,y0+h*g1/2);
f3=f(t0+h/2, x0+h*f2/2,y0+h*g2/2); g3=g(t0+h/2, x0+h*f2/2,y0+h*g2/2);
f4=f(t0+h, x0+h*f3,y0+h*g3); g4=g(t0+h, x0+h*f3,y0+h*g3);
x1=x0+h*(f1+2*f2+2*f3+f4)/6; y1=y0+h*(g1+2*g2+2*g3+g4)/6;
resu[0]=t0+h;resu[1]=x1;resu[2]=y1;
}
int main()
{
double f(double t,double x, double y);
double g(double t,double x, double y);
double initial[3],resu[3];
double a,b,H;
double t,step;
int i;
cout输入所求微分方程组的初值t0,x0,y0:;
cininitial[0]initial[1]initial[2];
cout输入所求微分方程组的微分区间[a,b]:;
cinab;
cout输入所求微分方程组所分解子区间的个数step:;
cinstep;
coutsetiosflags(ios::right)setiosflags(ios::fixed)setprecision(10);
H=(b-a)/step;
cout initial[0]setw(18)initial[1]setw(18)initial[2]endl;
for(i=0;istep;i++)
{ RK4( f,g ,initial, resu,H);
coutresu[0]setw(20)resu[1]setw(20)resu[2]endl;
initial[0]=resu[0];initial[1]=resu[1];initial[2]=resu[2];
}
return(0);
}
double f(double t,double x, double y)
{
double dx;
dx=x+2*y;
return(dx);
}
double g(double t,double x, double y)
{
double dy;
dy=3*x+2*y;
return(dy);
}
1.4经典四阶龙格库塔法解一阶微分方程程序调试结果图示:
原创力文档


文档评论(0)