% Smart antennas 2-D patterns for sin(theta)^2 pattern
% use 100 data points in theta and 100 data points in phi
set(0,'defaultfigurecolor','w')
ang=0:.1:2*pi;
r1=100;
W1=13.3*sin(ang).^2/r1^2;
r2=200;
W2=13.3*sin(ang).^2/r2^2;
%axes
figure
polar(ang,W1,'k')
hold on
polar(ang,W2,'k:')
hold off
view(90,-90)
grid off
axis off
title .
zoom(1)