sweeplot12.asv

来自「通信天线建模与MATLAB仿真分析原书中的代码」· ASV 代码 · 共 39 行

clear all
load('current.mat');

%Plot impedance (real+imag)
a=figure
plot(f, Impedance,'-',f,imag(Impedance),'--');
xlabel ('Frequency, Hz')
ylabel('Input  resistance, Ohm')
%axis([0 8000e6 0 400])
grid on


%Plot reflection coefficient(return loss) versus 50 Ohm
b=figure
Gamma=(Impedance-50)./(Impedance+50);
Out=20*log10(abs(Gamma));
plot(f, Out);
xlabel ('Frequency, Hz')
ylabel('Reflection Coefficient, dB')
grid on

%Plot gain and power
load('gainpower.mat')

c=figure
plot(f,GainLogarithmic);
xlabel('Frequency, Hz')
ylabel('Gain, dB')
grid on
d=figure
plot(f, TotalPower);
xlabel('Frequency, Hz')
ylabel('Radiated power, W')
%axis([0 8000e6 0 0.018])
grid on