Rittica转子动力学传递矩阵
请教转子动力学传递矩阵帮忙看一个转子动力学传递矩阵程序,一直得不到标准的剩余量曲线,还出现振荡,如果哪位前辈以前编过此程序,麻烦给传一个,解燃眉之急啊,多谢谢谢谢谢!!!!!
clear;
l=;
m=;
Jp=;
Jd=;
I=;
K=;
E=2.000e+011;
v=;
S=;
s=1;
x=[];
for n=200:800
for i=1:5
u11=;
u12=;
u21=(l(i)/(E*I(i))).*;
u22=;
s=sign(det(u21*S+u22))*s;
S=*inv();
end
D=det(S)*s;
x=;
end
n=200:1:800;
grid on
plot(n,x)
benteng6@tom.com
页:
[1]