www.pudn.com > antennas-and-radio-wave-propagation.rar > 矩形微带天线方向图.m, change:2002-01-01,size:573b


%矩形微带天线方向图 
%立体图 
w=0.1;   
l=0.3; 
sita=meshgrid(eps:pi/180:pi); 
fai=meshgrid(eps:2*pi/180:2*pi)'; 
r=abs(sin(0.5*2*pi*w*cos(sita))./(0.5*2*pi*w*cos(sita)).*sin(sita).*cos(0.5*2*pi*l*sin(sita).*sin(fai))); 
rmax=max(max(r)); 
[x,y,z]=sph2cart(fai,pi/2-sita,r/rmax); 
mesh(x,y,z); 
title('矩形微带线立体方向图'); 
%平面方向图 
figure(2); 
delta=0:pi/180:2*pi; 
fh=abs(sin(0.5*2*pi*w*cos(delta))./(0.5*2*pi*w*cos(delta)).*sin(delta)); 
fe=abs(cos(0.5*2*pi*l*sin(delta))); 
subplot(1,2,1);polar(delta,fh);title('fh'); 
subplot(1,2,2);polar(delta,fe);title('fe');