Rich (BB code):
close all;
clc;
w=0:.01:2*pi;
x=(1-(.25).^101 .* exp(-1i*101*w)).*(1-(1.5) .* exp(-1i*w))/((1-(.25).^exp(-1i*w)).*(1-(2/3) .* exp(-1i*w)));
magx=abs(x);
phax=angle(x).*180/pi;
subplot(2,1,1);plot(w,magx);
ylabel('magx');
xlabel('\omega,rad/sample');
subplot(2,1,2);plot(w,phax);
xlabel('\omega,rad/sample');
ylabel('phax');
thanks