我这有个初程序不知对你有没有用 !uJDhC
clear Q(J6;s#b
dt=; %时间间隔 */JMPw&
s= %信号数组 [ym
ynr3M
len=128; g1TMyIUt[
F=2*pi*(0:len/2)/len/dt; b _#r_`
fs=fft(s,len); Tf1G827
p=fs.*conj(fs) !xz0zT.
p=p(1:len/2+1); bx&?EUx+b
plot(F,p) )$_b?
ylabel('power spectrum density ') )FnJLd
xlabel('sequence ') J$X{4
title('03051171') Y^~Dr|5%
参数自已改吧