本帖最后由 ME! 于 2012-11-27 19:18 编辑
E=2.11e11;
rho=7800;
A=pi*0.1^2;
I=pi*0.2^4/64;
L=0.01;
W1=(A*L*rho)/3 ;
W2=(A*L*rho)/6;
W3=(156*A*L*rho)/420;
W4=(22*A*L^2*rho)/420;
W5=(54*A*L*rho)/420 ;
W6=(13*A*L^2*rho)/420;
W7=(3*A*L^3*rho)/420;
W8=(4*A*L^3*rho)/420;
M=[W1 0 0 W2 0 0;
0 W3 W4 0 W5 -W6;
0 W4 W8 0 W6 -W7
W2 0 0 W1 0 0;
0 W5 W6 0 W3 -W4
0 -W6 -W7 0 -W4 W8];
R1=A*E/L;
R2=12*I*E/(L^3);
R3=(6*E*I)/(L*L);
R4=4*I*E/L;
R5=2*I*E/L;
K=[R1,0,0,-R1,0,0;
0,R2,R3,0,-R2,R3;
0,R3,R4,0,-R3,R5;
-R1,0,0,R1,0,0;
0,-R2,-R3,0,R2,-R3;
0,R3,R5,0,-R3,R4];
D=K/M;
[ZX W9]=eig(D);
W=eig(D);
wn=sqrt(W)
求出来的W总有负值
|