我这有个初程序不知对你有没有用 aH$~':[93
clear ?SAi tQ3
dt=; %时间间隔 PT4`1Oy}/1
s= %信号数组 )5t_tPv
len=128; {e@1,19
F=2*pi*(0:len/2)/len/dt; cnc$^[c
fs=fft(s,len); )} #r"!
p=fs.*conj(fs) kU
Flp
p=p(1:len/2+1); + mcN6/
plot(F,p) vP?yl "U
ylabel('power spectrum density ') _YJw F1e+M
xlabel('sequence ') >r*Zm2($MR
title('03051171') 2<O8=I _
参数自已改吧