模型2.m

时变电磁场的数值分析与仿真

i=0:100;
r=i;
[I,R]=meshgrid(i,r);
P=I.^2.*R;
surf(I,R,P);
xlabel('I'),ylabel('R'),zlabel('P');
title('传输功率')