% This script plots the power spectral density estimate
% of a signal --Alper Ucar, ucar {at} ieee {dot} org
% data: output stream in time-domain
% fftlen: FFT length
% Fs: sampling rate
% pxf: mean-square power of the signal
function[pxf] = pspec(data,fftlen,Fs)
