Creación De patrones de radiación 3D De Antenas en Matlab

la idea es crear un patron de radiacion en 3d como se ve en la imagen.
Para ilustrar lo facil que se hacen este tipo de patrones con matlab voy empezar con un dipolo largo, aunque es posible para cualquier otra antena o arreglo de antenas.
los pasos son los siguietes:
1. conocer el patron:
para este caso el campo generado por un dipolo largo es de la siguiete forma:

donde B es la constante de fase es decir 2*pi/lambda.
y l es la longitud del dipolo, y "theta" es el angulo medido sobre el eje Z.
para este caso l=3*lambda/2
2. crear un archivo .m
3.escribimos el codigo: en el codigo se crean las variables y se grafica el campo.

%%%%%%%%%%%%%%%%%%%%%%%%%%%
%variables
la=1; %lambda
b=2*pi/la %beta
l=3*la/2 %longitud del dipolo
% creacion del los angulos.
fi=(0:.01:1)*2*pi; %fi
teta=(0:.01:1)*pi; %theta


% en 2D
%grafica del campo en el plano E.
E=abs((cos(b.*l./2.*cos(teta))-cos(b.*l./2))./sin(teta));
polar(teta,E)


%en 3D
% creacion del meshgrid tipica para crear graficas en 3d.
[FI,TETA]=meshgrid(fi,teta);
%creacion del campo.
E=abs((cos(b.*l./2.*cos(TETA))-cos(b.*l./2))./sin(TETA));

%cambio de coordenadas esfericas a rectangulares que son las que se usan para graficas en %3d en matlab.

X=E.*sin(TETA).*cos(FI);
Y=E.*sin(TETA).*sin(FI);
Z=E.*cos(TETA);



% grafica en 3d y ubicacion de la camara y luces.
S=surface(X,Y,Z,(abs(E)));
axis equal
axis off
lighting gouraud;
shading interp
view(0,40)
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
listos!!!!
facil no??... si tienen preguntas con gusto las resolveré.
Gracias.