| 查看: 1406 | 回复: 3 | ||
zhuang1017铁虫 (小有名气)
|
[求助]
间隙碰撞振动matlab编程求助已有1人参与
|
|
各位求助，关于两个自由度间隙碰撞的程序只能通过ode45算出没有发生碰撞时两个物体位移和速度，考虑间隙大小，发生碰撞后速度和位移都会发生变化，该怎样编程，自己编了一个程序，把两位移之差满足间隙作为条件语句，然后速度发生变化，但是位移任为未发生碰撞的位移，明显错误，现向各位求教，下面我贴出我的程序，请指正 function dy=test_fun(t,y) g(1)=0.02; g(2)=0.02; u=0.02; % f(t)=1; % fe=1; dy=zeros(4,1); % y=zeros(4,1); dy(1)=y(3); dy(2)=y(4); dy(3)= -2*g(1)*y(3)-y(1)+u*2*g(2)*y(4)+u*y(2)+cos(t);% c-b*x(1)-w*x(1)*x(2); dy(4)= -2*(1+u)*g(2)*y(4)-(1+u)*y(2)+2*g(1)*y(3)+y(1)-cos(t); % w*x(1)*x(2)-(b+m)*x(2); end y0=[0,0,0,0]; [t,y]=ode45('test_fun',[0,30],y0); T=30; y0=[0,0,0,0]; [t,y]=ode45('test_fun',T,y0); T=[0:0.1:30]; y0=[0,0,0,0]; [t,y]=ode45('test_fun',T,y0); u=0.02; r=0.2; for i=1:length(T) if abs(y(i,1)-y(i,2))>=0.8 Y(i,3)=(1-u*r)./(1+u)*y(i,3)+u*(1+r)./(1+u)*y(i,4); Y(i,4)=(1+r)./(1+u)*y(i,3)+(u-r)./(1+u)*y(i,4); else Y(i,3)=y(i,3); Y(i,4)=y(i,4); end Y(i,1)=y(i,1); Y(i,2)=y(i,2); end  碰撞.png  模型.jpg |
回复此楼» 猜你喜欢
之前让一硕士生水了7个发明专利，现在这7个获批发明专利的维护费可从哪儿支出哈？
已经有3人回复
-
到新单位后，换了新的研究方向，没有团队，持续积累2区以上论文，能申请到面上吗
已经有12人回复
-
博士读完未来一定会好吗
已经有27人回复
-
投稿精细化工
已经有4人回复
-
高职单位投计算机相关的北核或SCI四区期刊推荐，求支招！
已经有4人回复
-
导师想让我从独立一作变成了共一第一
已经有9人回复
-
读博
已经有4人回复
-
JMPT 期刊投稿流程
已经有4人回复
-
心脉受损
已经有5人回复
-
Springer期刊投稿求助
已经有4人回复
ftc_简单
银虫 (正式写手)
- 应助: 99 (初中生)
- 金币: 1276.3
- 散金: 151
- 红花: 29
- 帖子: 436
- 在线: 129.4小时
- 虫号: 4907455
- 注册: 2016-08-09
- 性别: GG
- 专业: 动力学与控制
2楼2017-06-08 15:36:23
zhuang1017
铁虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 758
- 散金: 50
- 帖子: 63
- 在线: 38.6小时
- 虫号: 4078324
- 注册: 2015-09-17
- 性别: GG
- 专业: 机械动力学
3楼2017-06-08 15:42:13
zhuang1017
铁虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 758
- 散金: 50
- 帖子: 63
- 在线: 38.6小时
- 虫号: 4078324
- 注册: 2015-09-17
- 性别: GG
- 专业: 机械动力学
4楼2017-06-08 15:42:31