% EXTRA DEMO:   POLAR PLOTS ON THE COMPLEX PLANE
%
% Program:      polar_plots_cart.m
% Written by:   
% For:          EE 311
%               Extra Demo Computer Lab 1
% Date:         5-31-2001
% Purpose:      This program plots:  
%               cos(n*theta)*exp(j*theta) vs. theta for n=1:10; 
%               on the complex plane in cartesian coordinates for
%               each value of n.
clear all, close all

j=sqrt(-1);
theta=(0:pi/100:2*pi);

for n=1:10
   figure               % Creates a new figure window
   hold on              % Changes the hold property from off to on
   grid                 % Puts a grid on the current figure
   s=['cos(' num2str(n) '\theta) * \it{e}^{(j\theta)}'];
   title(s)             
   xlabel('real axis')
   ylabel('imag axis')
   plot(cos(n*theta).*exp(j*theta))
                        % Plot function for current value of n
end