xc.m

来自「dsp学习中matlab试验源代码」· M 代码 · 共 13 行

n=0:9; 
x=sign(sign(10-n)+1); 
close all; 
subplot(2,1,1); 
stem(n,x);
title('Xc(t)或Rn(t)信号序列');
k=-25:25; 
X=x*(exp(-j*pi/25)).^(n'*k);
magX=abs(X);                     
subplot(2,1,2);
stem(magX);
title('Xc(t)或Rn(t)信号的幅度谱');