模拟电磁波衰减的matlab程序.pdf
《模拟电磁波衰减的matlab程序.pdf》由会员分享,可在线阅读,更多相关《模拟电磁波衰减的matlab程序.pdf(1页珍藏版)》请在冰豆网上搜索。
![模拟电磁波衰减的matlab程序.pdf](https://file1.bdocx.com/fileroot1/2022-10/19/7b1c50dc-81b5-47c3-812f-ca418751e1d9/7b1c50dc-81b5-47c3-812f-ca418751e1d91.gif)
%Createdby:
MingminSchu%Time:
2013/3/7%Function:
SimulationofattenuatedUPWholdonpause(3)holdoffk=2*pi*1e-2;w=6*pi*1e6;n=120*pi;ae=5e-3;ah=ae/n;alpha=0.002;t=0:
0.01e-6/3:
60e-6;z=0:
1:
1200;Nt=length(t);fori=1:
Nttn=t(i);E=ae.*exp(-alpha.*z).*sin(w.*tn-k.*z);H=ah.*exp(-alpha.*z).*sin(w.*tn-k.*z);S=E.*H;subplot(3,1,1)plot(z,E)subplot(3,1,2)plot(z,H)subplot(3,1,3)plot(z,S)pause(0.005e-6/3)end