¡¾´ð°¸¡¿Ó¦Öú»ØÌû

function [P,f]=fftpsd(x,Fs)
    m = length(x);          % Õû¸öÊý¾Ý³¤¶È
    n = pow2(nextpow2(m));  % À©Õ¹µ½ºÏÊʳ¤¶È£¬2µÄÕûÊý´ÎÃÝ
    y = fft(x,n);           
    f = (0:n-1)*(Fs/n);     %ƵÂÊ·¶Î§
    P = y.*conj(y)/n;   %¹¦ÂÊÆ×ÃܶÈ

    f=f(1:n/2);
    P=P(1:n/2);
   
    %plot(f,10*log10(P)); %°ÑÊý¾Ýת»»ÎªdB
    plot(f,P);
    grid;
    xlabel('Frequency (Hz)');
    ylabel('Power(dB)');
    title('{\bf Periodogram}');