%矩形波导的电磁场线
clear
a=4 ;b=3 ;
ma=linspace(0,a,25);
mb=linspace(0,b,25);
[x,y]=meshgrid(ma,mb);
m=2 ;n=2;
Ex=-(m/a)*cos(m*pi*x/a).*sin(n*pi*y/b);
Ey=-(n/b)*sin(m*pi*x/a).*cos(n*pi*y/b);
scale=.9;
quiver(x,y,Ex,Ey,scale,'r')
%plot(Hx,Hy,'r')
title('矩形波导E22波的电磁场线')
hold on
Hx1=-(n/b)*sin(m*pi*x/a).*cos(n*pi*y/b);
Hy1=(m/a)*cos(m*pi*x/a).*sin(n*pi*y/b);
scale=.9;
handle=quiver(x,y,Hx1,Hy1,scale,'b')
set(handle,'LineWidth',2)
%quiver(x,y,Hx1,Hy1,scale,'b')
%plot(Hx1,Hy1,'b.')
axis([0,4,0,3])
hold off
%% 大仙QQ：1960009019
%% 更多精彩专题干货尽在 在线教育微信公众号：大仙一品堂
