实验 3 电磁波垂直入射、透射和反射

实验内容一： clear all e1r=1; u1r=1; o1=0; e2r=4; u2r=1; o2=0; e0=10^-9/(36*pi); u0=4*pi*10^-7; f=1e9; T=1/f; c=3*1e8; L1=c/f; w=2*pi*f; k1=w*((e1r*e0)*(u1r*u0))^(1/2); k2=w*((e2r*e0)*(u2r*u0))^(1/2); L2=2*pi/k2; Eim=100; n1=120*pi*(u1r/e1r)^(1/2); n2=120*pi*(u2r/e2r)^(1/2); R=(n2-n1)/(n2+n1); Tra=1+R; t=0:0.01*T:5*T; z1=linspace(-5*L1,0,length(t)); z2=linspace(0,5*L2,length(t)); for t=0:0.01*T:5*T; Ei=Eim*cos(w*t-k1*z1); Er=Eim*R*cos(w*t+k1*z1); Et=Eim*Tra*cos(w*t-k2*z2); plot(z1,Ei); grid on

bash