短时傅里叶变换matlab程序

来源：小侦探旅游网

短时傅里叶变换matlab程序

clear all

%窗口函数％ n1=40;

window=boxcar（n1)； w1=window； figure(1）； stem(w1）；

％非平稳信号产生％ fs=1000； a=0:1/fs：1; f0=0; f1=150；

y1=chirp(a，f0,1,f1）； x=y1（1:510)； figure(2)； plot（x)；

% 短时傅里叶变换％ t=1:length（x)； n=length(x)；

[tfr，t,f］=tfrstft（x，t,n,w1,0）； contour（t，f，abs（tfr）)

clc

clear all %窗口函数% n1=40；

window=boxcar（n1）; w1=window; figure（1); stem(w1)；

％非平稳信号产生% fs=1000;

a=0：1/fs：1； f0=0; f1=150;

y1=chirp(a，f0,1,f1); x=y1(1:510）； figure(2）； plot(x)；

％短时傅里叶变换%

短时傅里叶变换matlab程序

t=1:length（x)； n=length(x)；

［S，F,T，P]=spectrogram(x,w1，32，256）； surf（T，F,10＊log10(abs(P）)）； axis tight; view（0,90）；

因篇幅问题不能全部显示，请点此查看更多更全内容

查看全文