|
- function AA
- global mu w F;
- mu=0.3;w=1.2;
- cF=;
- k=0;
- for F=cF
- k=k+1;
- =ode45(@duffing,,);
- x1=x(:,1);
- count=find(t>1800);
- Y=x1(count,:);
- t1=t(count,:);
- subplot(5,2,k)
- plot(t1,Y)
- xlabel('t');
- ylabel('x ');
- s=;
- title(s);
- end
- function dx=duffing(t,x)
- global mu w F;
- dx=;
- 杜芬(Duffing)方程 Poincare 截面图
- function aa
- global mu w F;
- mu=0.05;w=1;
- F=7.5;
- x0=;
- tspan = 0:0.1*2*pi:50000;
- =ode45(@duffing,tspan,x0);
- m=zeros(7000,1);
- n=zeros(7000,1);
- for i=1:7000
- m(i,1)=y(10*i,1);
- n(i,1)=y(10*i,2);
- end
- plot(m,n,'k.','markersize',1);
- function dx=duffing(t,x)
- global mu w F;
- dx=;
复制代码 我这有一个 你可以试试
|
|