matlab求解二阶微分方程代码

根据提供的代码，可以看出求解二阶微分方程的代码如下：

x_chuzh1=[0;0.2;0;0];
c1=0.1;
c2=0.4; 
k1=2; 
k2=3; 
m1=4; 
m2=6; 
[t,x]=ode45('dyna',[0,50],x_chuzh1,[],m1,m2,c1,c2,k1,k2); 
plot(t,x(:,4),'--b'); 
hold on 
set(gca,'FontSize',10,'Fontname','Times New Roman'); 
function xp=dyna(t,x,flg,m1,m2,c1,c2,k1,k2) 
    xp=zeros(4,1); 
    xp(1)=x(2); 
    xp(2)=-(c1/m1)*(x(2)-x(4))-(k1/m1)*(x(1)-x(3)); 
    xp(3)=x(4); 
    xp(4)=-(c1/m2)*(x(4)-x(2))-(k1/m2)*(x(3)-x(1))-(c2/m2)*x(4)-(k2/m2)*(x(3)-x(1))-(k2/m2)*x(3); 
end

以上代码使用了`ode45`函数来求解二阶微分方程。其中`dyna`函数定义了方程的具体形式，`[0,50]`表示求解的时间范围，`x_chuzh1`表示初始条件。求解后，代码会绘制结果并显示在图形界面中。