收藏 分享(赏)

常微分方程作业欧拉法与改进欧拉法.doc

上传人:精品资料 文档编号:8712147 上传时间:2019-07-09 格式:DOC 页数:7 大小:131.50KB
下载 相关 举报
常微分方程作业欧拉法与改进欧拉法.doc_第1页
第1页 / 共7页
常微分方程作业欧拉法与改进欧拉法.doc_第2页
第2页 / 共7页
常微分方程作业欧拉法与改进欧拉法.doc_第3页
第3页 / 共7页
常微分方程作业欧拉法与改进欧拉法.doc_第4页
第4页 / 共7页
常微分方程作业欧拉法与改进欧拉法.doc_第5页
第5页 / 共7页
点击查看更多>>
资源描述

1、P77 31.利用改进欧拉方法计算下列初值问题,并画出近似解的草图: ;5.0,20,3)(,1)( tydt代码:%改进欧拉法function Euler(t0,y0,inv,h)n=round(inv(2)-inv(1)/h;t(1)=t0;y(1)=y0;for i=1:ny1(i+1)=y(i)+h*fun(t(i),y(i);t(i+1)=t(i)+h;y(i+1)=y(i)+1/2*h*(fun(t(i),y(i)+ fun(t(i+1),y1(i+1)endplot(t,y,*r)function y=fun(t,y);y=y+1;调用:Euler(0,3,0,2,0.5)得到解

2、析解:hold on;y=dsolve(Dy=y+1,(y(0)=3),t);ezplot(y,0,2)图像:;2.0,0,5.)(,4)2(2 tytdty代码:function Euler1(t0,y0,inv,h)n=round(inv(2)-inv(1)/h;t(1)=t0;y(1)=y0;for i=1:ny1(i+1)=y(i)+h*fun(t(i),y(i);t(i+1)=t(i)+h;y(i+1)=y(i)+1/2*h*(fun(t(i),y(i)+ fun(t(i+1),y1(i+1)endplot(t,y,*r)function y=fun(t,y);y=y2-4*t;调用

3、:Euler1(0,0.5,0,2,0.2)图像:;1,50,4)(,1)3() tydty代码:function Euler2(t0,y0,inv,h)n=round(inv(2)-inv(1)/h;t(1)=t0;y(1)=y0;for i=1:ny1(i+1)=y(i)+h*fun(t(i),y(i);t(i+1)=t(i)+h;y(i+1)=y(i)+1/2*h*(fun(t(i),y(i)+ fun(t(i+1),y1(i+1)endplot(t,y,*r)function y=fun(t,y);y=(3-y)*(y+1);调用:Euler2(0,4,0,5,1)得到解析解:hold

4、 on;y=dsolve(Dy=(3-y)*(y+1),y(0)=4,t);ezplot(y)图像:;5.0,0,4)(,1)3()4 tydty代码:function Euler2(t0,y0,inv,h)n=round(inv(2)-inv(1)/h;t(1)=t0;y(1)=y0;for i=1:ny1(i+1)=y(i)+h*fun(t(i),y(i);t(i+1)=t(i)+h;y(i+1)=y(i)+1/2*h*(fun(t(i),y(i)+ fun(t(i+1),y1(i+1)endplot(t,y,*r)function y=fun(t,y);y=(3-y)*(y+1);调用:

5、Euler2(0,4,0,5,0.5)得到解析解:hold on;y=dsolve(Dy=(3-y)*(y+1),y(0)=4,t);ezplot(y)图像:14.考虑满足初始条件(x(0),y(0))=(1,1)的下列方程组: ;2.1.0,)2(;3,)1( 2yxdtyxxdty选定时间步长 t=0.25,n=5.用改进欧拉方法求两个方程组的近似解;(1) 代码:function Euler4(t0,int,n,h)t=t0;x(1)=int(1);y(1)=int(2);for i=1:nx1(i+1)=x(i)+h*xfun(t(i),x(i),y(i); y1(i+1)=y(i)+

6、h*yfun(t(i),x(i),y(i); t(i+1)=t(i)+h;x(i+1)=x(i)+1/2*h*(xfun(t(i),x(i),y(i)+xfun(t(i+1),x1(i+1),y1(i+1);y(i+1)=y(i)+1/2*h*(yfun(t(i),x(i),y(i)+yfun(t(i+1),x1(i+1),y1(i+1);endplot(t,x,o-r)hold onplot(t,y,*-g)hold onplot(x,y)function x=xfun(t,x,y);x=y;function y=yfun(t,x,y);y=-2*x-3*y;调用函数:Euler4(0,1,

7、1,5,0.25)图像:(2)代码:function Euler5(t0,int,n,h)t=t0;x(1)=int(1);y(1)=int(2);for i=1:nx1(i+1)=x(i)+h*xfun(t(i),x(i),y(i); y1(i+1)=y(i)+h*yfun(t(i),x(i),y(i); t(i+1)=t(i)+h;x(i+1)=x(i)+1/2*h*(xfun(t(i),x(i),y(i)+xfun(t(i+1),x1(i+1),y1(i+1);y(i+1)=y(i)+1/2*h*(yfun(t(i),x(i),y(i)+yfun(t(i+1),x1(i+1),y1(i+1);endplot(t,x,o-r)hold onplot(t,y,*-g)hold onplot(x,y)function x=xfun(t,x,y);x=y+y2;function y=yfun(t,x,y);y=-x+0.2*y-x*y+1.2*y2;调用函数:Euler5(0,1,1,5,0.25)图像:

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 企业管理 > 管理学资料

本站链接:文库   一言   我酷   合作


客服QQ:2549714901微博号:道客多多官方知乎号:道客多多

经营许可证编号: 粤ICP备2021046453号世界地图

道客多多©版权所有2020-2025营业执照举报