霍尔兹法求解质量弹簧系统的固有频率
程序：
%霍尔茨法
w=0:0.0001:2; %设置固有频率范围以及精度0.0001
x=zeros(100,20001);
x(1,:)=[ones(1,20001)]; %令振幅X1=1
sum=[zeros(1,20001)]
for i=1:99 %求解各阶振幅
sum=sum+x(i,:)
x(i+1,:)=x(i,:)-sum.*w.^2+x(1,:);
end
sums=[zeros(1,20001)];
for i=1:100
本文来自互联网用户投稿，文章观点仅代表作者本人，不代表本站立场，不承担相关法律责任。如若转载，请注明出处。 如若内容造成侵权/违法违规/事实不符，请点击【内容举报】进行投诉反馈！