|
楼主 |
发表于 2006-11-6 09:32
|
显示全部楼层
第二个系统的程序
- clear
- M=[1 0;0 2] %质量矩阵
- K=[10 -10; -10 50] % 刚度矩阵
- KM=inv(M)*K %动力矩阵
- [P,W2]=eig(KM); %求解特征值 和特征向量
- P1=P(1,:);
- P2=P(2,:);
- Mo=[1 1; P2./P1]; %模态
- f=sqrt(W2)/(2*pi) %固有频率
- A=[0 1 0 0;-10 0 10 0; 0 0 0 1; 5 0 -25 0];
- B=[0; 0 ;0 ;0];
- C=[1 0 0 0; 0 0 1 0];
- D=0;
- sys=ss(A,B,C,D); %状态方程
- t=0:0.01:10;
- [y1,t1,x1]=initial(sys,[0.1 0 0.028078 0],t); %初始条件仿真 (只有一阶模态)
- [y2,t2,x2]=initial(sys,[-0.1 0 0.17808 0],t);% 只有二阶模态的初始条件
- [y3,t3,x3]=initial(sys,[0.1 0 -0.1 0],t); % 一般条件
- subplot(311);
- plot(t1,y1);
- subplot(312);
- plot(t2,y2);
- subplot(313);
- plot(t3,y3);
复制代码
[ 本帖最后由 yejet 于 2006-11-7 15:52 编辑 ] |
评分
-
1
查看全部评分
-
|