jfk4112.m

来自「电磁辐射的数值分析与仿真（基于MATLAB语言）。包括两个点电荷的电场」· M 代码 · 共 13 行

clear;clc;
I=10;l=1;omega=10*pi;epsilon=0.7;lambda=10;z=100;
theta=0:pi/10:pi*2;r=100:100:1000;
c2=I*l/(2*lambda);
[Theta,R]=meshgrid(theta,r);
Hphi=c2.*sin(Theta)./R;

Etheta=c2.*z.*sin(Theta)./R;
subplot(1,2,1),surf(Theta,R,Hphi);axis([-1 6 0 700 -5e-3 5e-3])
xlabel('\theta'),ylabel('r'),zlabel('H_{\phi}'),title('远区场H_{\phi}')

subplot(1,2,2),surf(Theta,R,Etheta);axis([-1 6 0 700 -0.5 0.5])
xlabel('\theta'),ylabel('r'),zlabel('E_{\theta}'),title('远区场E_{\theta}')