# antenna.rar

• 敦敏
了解作者
• matlab
开发工具
• 16KB
文件大小
• rar
文件格式
• 0
收藏次数
• 10 积分
下载积分
• 219
下载次数
• 2010-04-13 22:16
上传日期

antenna.rar
• 天线7.5
• Traveling_Wave_Antenna__2.m
649B
• duicheng_zhengzi.m
774B
• symmetry diople.m
387B
• even_antenna.m
481B
• shuiping_antenna.asv
1.1KB
• diople2.asv
392B
• SHUIXIAN.asv
152B
• donghua.m
161B
• Traveling_Wave Antenna.asv
414B
• Untitled.asv
771B
• Traveling_Wave_Antenna.asv
513B
• even_antenna.asv
481B
• duicheng_zhengzi.asv
774B
• zxz.m
306B
• e_2.mdl
29.2KB
• diople.asv
757B
• diople_gai1.m
648B
• diople_gai1.asv
450B
• Untitled2.m
312B
• shuiping_antenna___2.m
357B
• shuiping_antenna.m
1.4KB
• Traveling_Wave_Antenna.m
513B

clc; clear; close all; %对称振子立方体方向图 %m=moviein(20); %for i=1:20; derta=meshgrid(eps:pi/360:pi/2); fai=meshgrid(eps:2*pi/180:2*pi)'; l=input('l='); %l=0.25; H=input('h='); %H=1.75; r=abs(cos(2.*pi.*l.*cos(derta).*sin(fai))-cos(2*pi*l))./abs(sqrt(1-cos(derta).^2*sin(fai).^2)+eps).*abs(2*sin(2.*pi.*H.*sin(derta))); rmax=max(max(r)); [x,y,z]=sph2cart(fai,derta,r/rmax); % % % figure(2) % % % % for i=1:181 % % % % for j=1:181 % % % % if y(i,j)<0.0011 % % % % [TH(i,j),R(i,j)]=cart2pol(x(i,j),z(i,j)); % % % % end % % % % end % % % % end 不行 % % % [TH,R]=cart2pol(x(:,1),y(:,1)); % % % polar(TH,R); % % % % % % figure(3) % % % [TH,R]=cart2pol(y(:,1),z(:,1)); % % % polar(TH,R); % % % figure(1) mesh(x,y,z); %text(0,-0.4,0.9,['l=',num2str(l)],'FontSize',16); %text(0,-0.4,0.85,['H=',num2str(l)],'FontSize',16); %axis([-1 1 -1 1 -1 1]); %pause(5); % m(:,i)=getframe; %end; %movie(m,1,1); polar(derta,abs(cos(2.*pi.*l.*cos(derta).*sin(fai))-cos(2*pi*l))./abs(sqrt(1-cos(derta).^2*sin(fai).^2)+eps).*abs(2*sin(2.*pi.*H.*sin(derta))),'*r') hold on polar(pi+derta,abs(cos(2.*pi.*l.*cos(derta).*sin(fai))-cos(2*pi*l))./abs(sqrt(1-cos(derta).^2*sin(fai).^2)+eps).*abs(2*sin(2.*pi.*H.*sin(derta))),'*r') hold off

相关推荐