%-------------------------------------------------------------------------
%exa121201_pyulear.m, for example 12.12.1 
%to test pyulear.m;
%-------------------------------------------------------------------------
clear all;

%調出數據；
load test x;

N=4096;
fn=-0.5:1/N:0.5-1/N;

% 使用自相關法得到功率譜估計；
xpsd=pyulear(x,30,N);
pmax=max(xpsd);
xpsd=xpsd/pmax;
xpsd=10*log10(xpsd+0.000001);
plot(fn,fftshift(xpsd));grid on;