% Figure 4.2  2-D patterns for sin(theta)^2 element pattern
% and the two element array factor pattern cos(pi*sin(theta)/2+beta/2)^2
% 
set(0,'defaultfigurecolor','w')
theta=0:.01:2*pi;

EF=sin(theta).^2;
AF=cos(pi*sin(theta)/2).^2;
% element factor pattern
figure
polarpattern(theta,EF,'k')
view(90,-90)
% array factor pattern
figure
polarpattern(theta,AF,'k')
view(90,-90)
% pattern multiplication
figure
polarpattern(theta,EF.*AF,'k')
view(90,-90)