dzhli.asv

matlab编写结构计算振型分解法

function [FF]=dzhli(aa,rr,AA,mm,dn)  %求解水平地震作用F,输入变量：地震影响系数aa，地震影响系数α
g=9.8;%重力加速度

for j=1:dn
    for i=1:dn
    FF(i,j)=AA(i,j)*aa(j)*rr*mm(i)*g;
    end
end