num8.m

来自「有关dsp的,有好多子程序,还是不错的,欢迎使用」· M 代码 · 共 24 行

%Xc的奇偶序列及其频谱
N=30;
xc=R(10,N);
for n=1:N
    xe(n)=(xc(n)+xc(N-n+1))/2;
    xo(n)=(xc(n)-xc(N-n+1))/2;
end
close all;
Xc=dft(xc,N);
subplot(3,3,1);
stem(xc);
title('原信号序列');
draw(Xc,3,3,2);
Xe=dft(xe,N);
subplot(3,3,4);
stem(xe);
title('偶信号序列');
draw(Xc,3,3,5);
Xo=dft(xo,N);
subplot(3,3,7);
stem(xo);
title('奇信号序列');
draw(Xo,3,3,8);