ex.m

电磁场圆极化

%Js
%电流的图像
%copyright 属于研学论坛bbs.matwav.com和plasma

clear all;
sigma=1.e+7;
delta=1;%集肤深度大，衰减慢。
max_z=10*delta;
del=.01*delta;
i=1;
for z=0:del:max_z;
    ex(i)=exp(-z/delta);%*cos(z/delta);
    i=i+1;
end
z=0:del:max_z;
axis equal;
plot(z,ex, 'LineWidth',4);
xlabel('z(\delta)');
ylabel('Ex的振幅(归一化后)');
title('Ex对z的曲线');
hold on;
delta=10;%集肤深度大，衰减慢。
max_z=10*delta;
del=.01*delta;
i=1;
for z=0:del:max_z;
    ex(i)=exp(-z/delta);%*cos(z/delta);
    i=i+1;
end
z=0:del:max_z;
plot(z,ex,    'Color','red',    'LineWidth',2);
xlabel('z(\delta)');
ylabel('Ex的振幅(归一化后)');
title('Ex对z的曲线,红色\delta=10,蓝色\delta=1');