%vlhkost vzduchu
vlhkost=[66.6 66.2 66.3 66.5 66.4 65.7 65.3 65 64.8 65.6 66.4 66.1 65.4 64.9 65 64.9 64.8 64.8 64.8 64.6 66.2 65.8 65.1 64.7 64.6 66 71.1 84.3 78.9 71.1 95.7 100 100 100];
vLength=length(vlhkost);
vMin=min(vlhkost);
vMax=max(vlhkost);

vMin=(round(vMin))-5;
vMax=(round(vMax))+5;

xOsMax=5*vLength;
x=5:5:xOsMax;

%xlim([0 max(x)]);
plot(x,vlhkost, 'k','LineWidth',1);
ylim([vMin vMax]);
grid on
hold on
scatter(x,vlhkost,'xk','LineWidth',1.75);

title('Vlhkost vzduchu');
xlabel('cas [s]');
ylabel('vlhkost [%]');

%teplota
teplota=[14.9 15 14.9 15 14.9 14.9 15 14.8 14.9 14. 14.9 15 14.9 15 15 15 14.9 14.7 15 14.8 14.8 14.8 14.8 14.7 14.7 14.8 15 16.5 15.4 19.2 19.3 19.7 21 19.4];
tLength=length(teplota);
tMin=min(teplota);
tMax=max(teplota);

tMin=(round(tMin))-1;
tMax=(round(tMax))+1;

xOsMax=5*tLength;
x=5:5:xOsMax;

%xlim([0 max(x)]);
figure
plot(x,teplota, 'k','LineWidth',1);
ylim([tMin tMax]);
grid on
hold on
scatter(x,teplota,'xk','LineWidth',1.75);

title('Teplota vzduchu');
xlabel('cas [s]');
ylabel('teplota [°C]');

%tlak
tlak=[973.55 973.57 973.63 973.55 973.49 973.52 973.5 973.49 973.56 973.56 973.44 973.43 973.62 973.5 973.56 973.5 973.5 973.51 973.5 973.42 973.4 973.36 973.48 973.18 979.11 980.29 977.21 978.79 982.04 980.65 982.02 983.42 981.73];
pLength=length(tlak);
pMin=min(tlak);
pMax=max(tlak);

pMin=(round(pMin))-1;
pMax=(round(pMax))+1;

xOsMax=5*pLength;
x=5:5:xOsMax;

%xlim([0 max(x)]);
figure
plot(x,tlak, 'k','LineWidth',1);
ylim([pMin pMax]);
grid on
hold on
scatter(x,tlak,'xk','LineWidth',1.75);

title('Tlak vzduchu');
xlabel('cas [s]');
ylabel('tlak [hPa]');
