|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
本帖最后由 wdhd 于 2016-9-13 13:42 编辑
我的频谱图画出来跟实际的频率对不起来,
我是用Newmark解出来的数据带进去Matlab 程序用FFT画频谱图
是程序有问题吗? 我看不太懂程序
这是别人给的
请高手救我
拜托!!
%% 傅氏频谱图 %%
% Chang Sheng Lin, 2007/02/20 %
clear all;
cd F:\研究资料\
load BDisp3_free4_1000.m %% 输入档名
disp=BDisp3_free4_1000; %% 输入档名(不加.m)
%%
[num dof]=size(disp);
for i=1:dof;
f(:,i)=disp(:,i);
dt=0.01;
w=pi/dt;
Nt=num;
Nw=Nt/2;
dw=w/Nw;
%ff=fft(f)*dt;
T=Nt*dt;
sf(:,i)=1/(2*pi*T)*(abs(fft(f(:,i)))*dt).^2;
%sf1=sum(sf,2);
%cc=ifft(sqrt(sf*2*pi*T)/dt);
figure(i)
plot([0:dw:(Nw-1)*dw],sf(1:Nw,i))
plotedit
%title('傅氏频谱图')
%title('外力傅氏频谱图')
%title('位移响应傅氏频谱图')
%xlim([dw Nw*dw])
xlabel('Frequency (rad/sec)')
ylabel('H(w) (m/N)')
%ylabel('|Fx(w)|')
%xlim([0*dw 10000*dw])
%legend('1-DOf','2-DOF','3-DOF')
xlim([0 1200])
end
|
|