声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1711|回复: 1

[动力学和稳定性] wilson-θ法中f(t+θ*dt)的问题

[复制链接]
发表于 2006-12-12 10:18 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
各位好
       我的毕业设计里面也设计到利用wilson-θ法编程的问题,可是编到现在我开始怀疑自己的程序是否有问题,我把程序上穿一下,希望各位给指点一下,我现在怀疑是我的f(t+θ*dt)用的不当,希望各位帮看看,我实在是想不出哪里有问题
其中的MM,CC,KK都是已知的


  1. d2=inv(MM)*(QF-CC*d1-KK*d0);                % d2是加速度的初始值

  2. %%wilson循环
  3. for i=1:TTT;
  4. t(i)=dt*(i-1);
  5. sit=1.4;
  6. a0=6/(sit*dt)^2;
  7. a1=3/(sit*dt);
  8. a2=2*a1;
  9. a3=sit*dt/2;
  10. a4=a0/sit;
  11. a5=-a2/sit;
  12. a6=1-3/sit;
  13. a7=dt/2;
  14. a8=dt^2/6;
  15. %%结束
  16. nd=60*ii.*abs(d1)/Dt/pi;                       %电机在任意时刻的转速      r/min

  17. NM=Mmax*2*(1+Sm)*Sm*n0.*(n0-nd)./((n0-nd).^2+(n0*Sm)^2+2*Sm^2.*(n0-nd)*n0);

  18. QF=ii*2.*NM*yt/Dt;
  19. QF=QF.*RR;
  20. QDF(i,:)=QF;

  21. d00=0.0;         %%d00初始位移
  22. ff=(-AA1.*sign(d1)-AA2).*sign(d1);
  23. pk=KK+a0*MM+a1*(CC+diag(f.*sign(d1)));
  24. pk=inv(pk);
  25. ff=ff+MM*(a0*d0+a2*d1+2*d2)+(CC+diag(f.*sign(d1)))*(a1*d0+2*d1+a3*d2);
  26. pf1=QF+ff;
  27. d00=d00+pk*pf1;                                          
  28. d22=a4*(d00-d0)+a5*d1+a6*d2;                                         %%d22加速度
  29. d11=d1+a7*(d22+d2);                                                    %%d11速度
  30. d00=d0+dt*d1+a8*(d22+2*d2);

  31. d0=d00;                                                             %%d0位移
  32. d1=d11;                                                     %%d1速度,d2 加速度
  33. d2=d22;
  34. S(i,:)=d00;                                                  %%S位移,V速度,A加速度
  35. V(i,:)=d11;
  36. A(i,:)=d22/10;
  37. F(i,:)=ff;
  38. end
  39. S
  40. V
  41. A
  42. F
复制代码
回复
分享到:

使用道具 举报

 楼主| 发表于 2006-12-22 09:48 | 显示全部楼层
自己顶一下,
怎么没有人回应呢?
谢谢
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-17 10:44 , Processed in 0.058533 second(s), 17 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表