subfuncmatrix_cantilever.m

主要用于高层建筑的减振设计,根据线性振动理论,用matlab高级语言编写而成,由一个主程序和四个子程序组成

function CM=SUBFunCMatrix_Cantilever(n,c,E)
% n--------将杆分为n段
% E---------弹性模量2.1*10^11
% c--------阻尼系数

CM=zeros(n,n);
CM(1,1)=2*c;
for i=2:n
   CM(i,i)=2*c;
   CM(i,i-1)=-c;
   CM(i-1,i)=-c;
end
CM(n,n)=c;