bartlett.m

来自「对不同的功率谱密度分析方法的研究」· M 代码 · 共 36 行

Fs=1000;
NFFT=256;
% n=0:1/Fs:1;
% load 100a.txt
% x=X100a;
% x=sin(2*pi*100*n)+sin(2*pi*300*n)+sin(2*pi*450*n)+randn(size(n));
% Cx=xcorr(x,'unbiased');%计算序列的自相关函数
% Cxk=fft(Cx,NFFT);%计算FFT
% pxx=abs(Cxk);%求解PSD
% t=0:round(NFFT/2-1);
% k=t*Fs/NFFT;
% p=10*log(pxx(t+1));
% plot(k,p)
% xlabel('频率(Hz)');
% ylabel('相对功率谱密度(dB/Hz)');
% h=fir1(20,0.3);
% load 100a.txt
% x=X100a;
% x=filter(h,1,r);
p=0.95;
[b,a]=ellip(6,2,50,02);
r=randn(4096,1);
x=filter(b,a,r);
psd(x,NFFT,Fs,[],0,p);

% [P,f]=pburg(x,18,NFFT,Fs);
% % [P2,f]=pmcov(x,20,[],Fs);
% Pxx=10*log10(P);
% % Pxx2=10*log10(P2);
% figure
 plot(f,psd)
% grid on;
xlabel('频率(Hz))');
ylabel('相对功率谱密度(dB/Hz)');

% legend('协方差法','改进的协方差法');