实验七用matlab求解常微分方程

1、实验七用matlab求解常微分方程一、实验目的：1、熟悉常微分方程的求解方法，了解状态方程的概念；2、能熟练使用dsolve函数求常微分方程(组)的解析解；3、能熟练应用ode45ode15s函数分别求常微分方程的非刚性、刚性的数值解；4、掌握绘制相图的方法二、预备知识：1.微分方程的概念未知的函数以及它的某些阶的导数连同自变量都由一已知方程联系在一起的方程称为 微分方程。如果未知函数是一元函数，称为常微分方程。常微分方程的一般形式为F(t,y,y,y, ,y(n)0如果未知函数是多元函数，成为偏微分方程。联系一些未知函数的一组微分方程组称为 微分方程组。微分方程中出现的未知函数的导数的最高阶

2、解数称为微分方程的阶。若方程中未知函数及其各阶导数都是一次的，称为线性常微分方程，一般表示为y(n)a!(t)y(n1)a. i(t)y an(t)y b(t)若上式中的系数ai(t),i 1,2,n均与t无关，称之为常系数。2常微分方程的解析解dy .y 1有些微分方程可直接通过积分求解例如，一解常系数常微分方程dt可化为dydtty 1,两边积分可得通解为y ce1.其中c为任意常数.有些常微分方程可用一些技巧,如分离变量法，积分因子法，常数变异法，降阶法等可化为可积分的方程而求得解析解线性常微分方程的解满足叠加原理，从而他们的求解可归结为求一个特解和相应齐次微 分方程的通解一阶变系数线性

3、微分方程总可用这一思路求得显式解。高阶线性常系数微分 方程可用特征根法求得相应齐次微分方程的基本解，再用常数变异法求特解。一阶常微分方程与高阶微分方程可以互化，已给一个n阶方程(n)(n 1)、y f(t, y ,y , , y )(n 1)设y1，兀y，yny，可将上式化为一阶方程组y2Y21 y3 yn 1 ynyn f(t,y1,y2, ,yn)反过来，在许多情况下，一阶微分方程组也可化为高阶方程。所以一阶微分方程组与高 阶常微分方程的理论与方法在许多方面是相通的，一阶常系数线性微分方程组也可用特征根法求解。3微分方程的数值解法除常系数线性微分方程可用特征根法求解，少数特殊方程可用初等积

4、分法求解外，大部分微分方程无限世界，应用中主要依靠数值解法。考虑一阶常微分方程初值问题y(t) f(t, y(t),t0t tfy(t。)y。其中y (力2, ym), f(f1,f2,fm),y0(y10,y20,ym0)所谓数值解法，就是寻求y（t）在一系列离散节点t0 tltn tf上的近似值yk,k 0,1,n称hktk 1tk为步长，通常取为常量h。最简单的数值解法是Euler法。Euler法的思路极其简单：在节点出用差商近似代替导数y(tk)y(tki) y(tQh这样导出计算公式（称为Euler格式）yk i yk hf （tk, yk）,k 0,1,2,他能求解各种形式的微分方

5、程。Euler法也称折线法。Euler方法只有一阶精度，改进方法有二阶Runge-Kutta法、四阶Runge-Kutta法、五阶Runge-Kutta-Felhberg法和先行多步法等，这些方法可用于解高阶常微分方程（组）初值问 题。边值问题采用不同方法，如差分法、有限元法等。数值算法的主要缺点是它缺乏物理理解。4.解微分方程的 MATLAB命令MATLAB中主要用dsolve求符号解析解，ode45,ode23,ode15s求数值解。s=dsolve（方程1方程2初始条件1,初始条件2,自变量）用字符串方程表示，自变量缺省值为t。导数用D表示，2阶导数用D2表示，以此类推。S返回解析解。在

6、方程组情形，s为一个符号结构。tout,yout=ode45（ yprime ,t采f用0变步长四阶 Runge-Kutta 法和五阶Runge-Kutta-Felhberg法求数值解，yprime是用以表示f（t,y）的M文件名，t0表示自变 量的初始值，tf表示自变量的终值，y0表示初始向量值。输出向量tout表示节点（t0,t1,tn）T,输出矩阵yout表示数值解，每一列对应y的一个分量。若无输出参数，则自动作出图形。ode45是最常用的求解微分方程数值解的命令，对于刚性方程组不宜采用。ode23与ode45类似，只是精度低一些。ode12s用来求解刚性方程组， 是用格式同ode45。

7、可以用help dsolve, help ode45查阅有关这些命令的详细信息例1求下列微分方程的解析解(1) y ay b(2) y Sin(2x)y,y(0)0,y(0)1(3) f f g,g g f,f() 1, g() i方程(1)求解的MATLAB 代码为：clear;s=dsolve(Dy=a*y+b)结果为s =-b/a+exp(a*t)*C1方程(2)求解的MATLAB 代码为：clear;s=dsolve(D2y=si n(2*x)-y,y(0)=0,Dy(0)=1,x)simplify(s) %以最简形式显示s结果为s =(-1/6*cos(3*x)-1/2*cos(x)

8、*si n(x)+(-1/2*si n(x)+1/6*si n(3*x)*cos(x)+5/3*si n(x) ans =-2/3*si n(x)*cos(x)+5/3*si n(x)方程(3)求解的MATLAB 代码为：clear;s=dsolve(Df=f+g,Dg=g-f,f(0)=1,g(0)=1)simplify(s.f) %s是- -个结构simplify(s.g)结果为ans =exp(t)*cos(t)+exp(t)*si n(t)ans =-exp(t)*si n( t)+exp(t)*cos(t)例2求解微分方程y y t 1, y(0) 1,先求解析解，再求数值解，并进行

9、比较。由clear;s=dsolve(Dy=-y+t+1,y(0)=1,t)simplify(s)可得解析解为y t e七。下面再求其数值解，先编写 M文件fun8.m%M数 fun8.mfun cti on f=fun 8(t,y)f=-y+t+1;再用命令clear; close; t=0:0.1:1;y=t+exp(-t); plot(t,y); %化解析解的图形hold on; %保留已经画好的图形，如果下面再画图，两个图形和并在一起t,y=ode45(fu n8,0,1,1); plot(t,y,ro); %画数值解图形，用红色小圈画xlabel(t),ylabel(y)结果见图7.

10、11.4_&I*1&I1.35.1.3.1.25_y 1.2_n1.15_/_1.1-1.05-1I1r:00.20.40.60.81t图16.6.1解析解与数值解由图16.6.1可见，解析解和数值解吻合得很好。例3求方程ml mg sin , (0)。， (0)0的数值解.不妨取11,g9.8, (0)15 .则上面方程可化为9.8sin , (0)15, (0)0先看看有没有解析解.运行MATLAB代码clear;s=dsolve(D2y=9.8*si n(y),y(0)=15,Dy(0)=0,t)simplify(s)知原方程没有解析解.下面求数值解.令y1 丫2可将原方程化为如下方程组

11、yr y2y 9.8si n(y1)y1(0)15, y2(0)0建立 M文件fun9.m如下%皿文件fun9.mfun cti on f=fun 9(t,y)f=y(2), 9.8*s in (y(1); %f向量必须为一列向量运行MATLAB代码clear; close;t,y=ode45(fu n9,0,10,15,0);plot(t,y(:,1); %画随时间变化图,y(：2)贝U表示的值xlabel(t),ylabel(y1)结果见图7.216.51615.515 |iii:012345678910t图7.2数值解由图7.2可见， 随时间t周期变化。以上这些都是常微分方程的精确解法，

12、也称为常微分方程的符号解。但是， 我们知道，有大量的常微分方程虽然从理论上讲，其解是存在的，但我们却无法求出其解析解，此时，我们需要寻求方程的数值解，在求常微分方程数值解方面， MATLAB具有丰富的函数，我们将其统称为 solver，其一般格式为：T,Y=solver(odefu n, tspa n,yO)该函数表示在区间tspan=t0,tf上，用初始条件yO求解显式常微分方程y f(t,y)solver 为命令 ode45，ode23, ode113, ode15s ode23s ode23t, ode23tb 之，这些命令各有特点。我们列表说明如下:求解 器ODE类型特点说明ode45

13、非刚性一步算法，4,5 阶 Runge-Kutta方法累积截断误差(x)大部分场合的首选算法ode23非刚性一步算法，2,3 阶 Runge-Kutta方法累积截断误差(x)使用于精度较低的情形ode113非刚性多步法，Adams算法，高低精度均可达到10 3 10 6计算时间比ode45短ode23t适度刚性采用梯形算法适度刚性情形ode15s刚性多步法，GearS向 数值积分，精度中等若ode45失效时，可尝试使用ode23s刚性一步法，2阶Rosebrock算法， 低精度。当精度较低时，计算时间比ode15s短odefun为显式常微分方程V f (t, V)中的f (t, V)tspan

14、为求解区间，要获得问题在其他指定点to,tl,t2丄上的解，则令tspa nto，tl，t2丄，tf(要求 ti单调)，y0初始条件2例 5：求解常微分方程 y 2y 2x 2x，o x 0.5，y(0)1 的 matlab程序如下：fun=inline(-2*y+2*x*x+2*x) ； x,y=ode23(fun,0,0.5,1)结果为：x =0,0.0400,0.0900,0.1400,0.1900,0.2400,0.2900,0.3400,0.3900,0.4400,0.4900,0.5000y =1.0000,0.9247,0.8434,0.7754,0.7199,0.6764,0.

15、6440,0.6222,0.6105,0.6084,0.6154,0.6179例6:求解常微分方程dt2(1 吧 y 5 1,y(0)0的解，并画出解的图形。分析：这是一个二阶非线性方程，用现成的方法均不能求解，但我们可以通 过下面的变换，将二阶方程化为一阶方程组，即可求解。令：x1dyvX2y，dt，7则得到:dx1dtx,花(0)1dx2dt27(1 人)X2 人，X2(0)0按着，编与vdp.m 女口下：fun cti on fy=vdp(t,x)fy=x(2);7*(1-x(1)A2)*x (2) -x(1); 再编写m文件sy12_6.m如下：y0=1;0t,x=ode45(vdp,0,40,y0); y=x(:,1);dy=x(:,2);plot(t,y,t,dy)三、实验内容：1求下列微分方程的解析解(1) yrr +2_/-3，=召如严-乃=20血