|
楼主 |
发表于 2008-10-3 21:16
|
显示全部楼层
不好意思啊,这2日没能上网,前辈们在假日还如此勤学,值得我们学习!一起加油吧!!!
这是一个综合考虑齿侧间隙和时变啮合刚度的单级齿轮系统的动力学模型
程序如下:
2个M函数文件
function df=daba(t,x,flag,ks)
fx=fenduan(x,1);
df=[x(2);-2*ks*x(2)-(1+0.1*cos(t))*fx+0.1+0.2*cos(t)];
function fx=fenduan(x,b)
if x(1)>b
fx=x(1)-b;
elseif x(1)<-b
fx=x(1)+b;
else fx=0;
end
主函数:
clear
ks=0.08;
options=odeset('RelTol',1e-8);%定义误差精度的,系统默认1e-3,如果改为1e-3,X将等于0
tt=2*pi; %定义步长的
[t,x]=ode45(@daba,[0:tt/100:80*tt],[1.1,0],options,[],ks);
plot(x(7000:end,1),x(7000:end,2),'-'); |
|