clear all;
close all;
Mhz = [31.6 76.1 112.5 136.7 194.4 332.9];

Ehmax3 = [-1.38E+01 1.70E+00 6.20E+00 9.26E+00 1.32E+01 1.80E+01];
Evmax3 = [-4.04E+00 3.86E+00 5.95E+00 7.11E+00 7.33E+00 1.44E+01];
Ehmax10 = [-2.78E+01 -1.12E+01 -5.96E+00 -2.21E+00 2.75E+00 7.86E+00];
Evmax10 = [-1.28E+01 -4.36E+00 -1.66E+00 3.39E-01 3.19E+00 6.65E+00];

figure
grid on;
hold on;
zoom on;
plot(Mhz,Ehmax3,'g',Mhz,Evmax3,'r')
legend('Evmax','Ehmax')
title('Wykres maksymalnej wartości Ehmax i Evmax dla d=3m')
ylabel('dB')
xlabel('Częstotliwość [MHz]')


figure
grid on;
hold on;
zoom on;
plot(Mhz,Ehmax10,'g',Mhz,Evmax3,'r')
legend('Evmax','Ehmax')
title('Wykres maksymalnej wartości Ehmax i Evmax dla d=10m')
ylabel('dB')
xlabel('Częstotliwość [MHz]')