离散傅里叶变换实验.doc

文档介绍：magx=abs(x); angx=angle(x);
realx=,magx);
title('幅度部分');
subplw=[0:1:500]*(pi/500);
x=exp(j*w)./(exp(j*w)-*ones(1,501));
ot(2,2,2);
plot(w/pi,angx);
title('相角部分');
subplot(2real(x); imagx=imag(x);
subplot(2,2,1);
plot(w/pi,2,3);
plot(w/pi,realx);
title(' 实部');
subplot(2,2,4);
plot(w/pi,imagx);
title('虚部');
n=0:10;
x=(*exp(j*pi/3)).^n;
k=-200:200;
w=(pi/100)*k;
X=x*(exp(-j*pi/100)).^(n'*k);
magX=abs(X);
angX=angle(X);
subplot(2,1,1);
plot(w/pi,magX);
subplot(2,1,2);
plot(w/pi,angX/pi);

n=0:100;
x=cos(pi*n/2);
k=-100:100;
w=(pi/100)*k;
X=x*(exp(-j*pi/100)).^(n'*k);
y=exp(j*pi*n/4).*x;
Y=y*(exp(-j*pi/100)).^(n'*k);
subplot(2,2,1);
plot(w/pi,abs(X));
axis([-1,1,0,60]);
subplot(2,2,2);
plot(w/pi,angle(X)/pi);
axis([-1,1,-1