|
楼主 |
发表于 2010-4-9 11:12
|
显示全部楼层
回复咕噜噜
感谢您的关注!
我建立的不是齿轮模型,但是和齿轮某种程度上有点相似,因为处于关键阶段,所以很抱歉没有办法向您透露具体模型原型!
程序可以和您分享,但是我也是刚开始做,希望不要见笑!当然更希望您能多指教!
第一个是函数程序:
function dy=myode11(t,x)
dy=zeros(2,1);
M=2;
C=2;
K=2e5;
% k=0,1,2...1000;
dy(1)=x(2);
dy(2)=(f(t)-C*x(2)-K*d(x(1)))/M;
function mydd=d(x)
e=0.004;
if x>e
mydd=x-e;
elseif x<-e
mydd=x+e;
elseif x>-e&&x<e
mydd=0;
else
disp('x类型错误')
end
function mf=f(t)
A=14500;w=2.4;
t1=t*w/pi;
t2=fix(t1/2)*2;
if t1>t2&&t1<t2+1
mf=A*sin(w*t);
else
mf=0;
end
这个是做poincare的程序:
options = odeset('RelTol',1e-7);
[t1,x1] = ode45(@myode11,[0:2*pi/10:800*2*pi],[0,0],options)
i=3000:10:8000;
plot(x1(i,1),x1(i,2),'.')
xlabel('0:2*pi/10:600*2*pi,i=3000:10:8000','fontsize',14); |
|