%-------------------------------------------------------------------------
%exa121201_pburg.m, for example 12.12.1 
%to test pburg.m;
%-------------------------------------------------------------------------
clear all;

% 調出數據；
load test x;

N=4096;
fn=-0.5:1/N:0.5-1/N;
% 使用 Burg 算法得到功率譜估計；
xpsd=pburg(x,10,N);
pmax=max(xpsd);
xpsd=xpsd/pmax;
xpsd=10*log10(xpsd+0.000001);
plot(fn,fftshift(xpsd));grid on;