r5.m

dsp学习中matlab试验源代码

%改变Xc的长度为五
m=0:4; 
y=sign(sign(10-m)+1); 
close all; 
subplot(3,2,1); 
stem(m,y);
title('Xc(t)或Rn(t)信号序列');
k=-25:25; 
Y=y*(exp(-j*pi/25)).^(m'*k);
magY=abs(Y);                     
subplot(3,2,2);
stem(magY);
title('Xc(t)或Rn(t)信号的幅度谱');axis([0,50,0,20]);