f5_6.m

matlab时频分析配套源码第3章的程序

%产生两分量信号
sig=fmconst(128,0.15)+amgauss(128).*fmconst(128,0.4);

%显示
figure(1);
plot(real(sig),'LineWidth',2);
xlabel('时间 t');
ylabel('幅值 A');

%计算Wigner-Ville分布
figure(2);
[tfr,t,f]=tfrwv(sig);
contour(t,f,tfr);
xlabel('时间 t');
ylabel('频率 f');

%计算伪Wigner-Ville分布
[tfr,t,f]=tfrpwv(sig);
figure(3)
contour(t,f,abs(tfr));
xlabel('时间 t');
ylabel('频率 f');

%计算平滑伪Wigner-Ville分布
[tfr,t,f]=tfrspwv(sig);
%显示
figure(4)
contour(t,f,abs(tfr));
xlabel('时间 t');
ylabel('频率 f');