problem_3_3_a.m

来自「Ultra.Wideband.Signals.and.Systems.in.Co」· M 代码 · 共 13 行

clear all;
iio=0;
for omega=-pi:.001:pi;
    iio=iio+1;
     X(iio)=cos(omega/2)*cos(omega)*exp(-j*1.5*omega);
 end,
figure (1);omega=-pi:.001:pi;plot(omega,abs(X),'r');
axis([-pi pi 0 1]);xlabel('\Omega');ylabel('|X(e^{j\Omega})|');grid on;
figure (2);omega=-pi:.001:pi;plot(omega,angle(X),'r');
axis([-pi pi -3 3]);xlabel('\Omega');ylabel('Phase of X(e^{j\Omega})');grid on;
%