%nemor5
%Y8GLY7

meresiErtekek= randi([900,1090],4,3,31);
segedx=linspace(1, 31, 31);
plot(x, squeeze(meresiErtekek(1,3,:)), '-.ok', 'LineWidth', 2);     %-.-.- ... töréspontoknál kör és fekete
xlim([1 31]);
ylim([890 1100]);
set(gca,'XTick',5:5:30);
set(gca,'YTick',900:50:1100);
title ('elso szenzor, esti meres, mindennap' , 'FontWeight','bold', 'FontSize', 12);
xlabel('napok szama', 'FontWeight', 'bold','FontSize',12);
ylabel('legkori nyomas [hPa]','FontSize',12, 'FontWeight','bold');
seged2x=linspace(0,31,1000);
hold on;
plot(seged2x, 930, '-m','LineWidth', 5);            %magenta színű vonal
plot(seged2x, 1060, '-m','LineWidth', 5);
nullindex=find((meresiErtekek<930) | (meresiErtekek>1060));
meresiErtekek(nullindex)=0;
db=squeeze(meresiErtekek(1,3,11:20));
darab=sum(db~=0);
plot(x, squeeze(meresiErtekek(1,3,:)),'go', 'MarkerFaceColor', 'r', 'MarkerSize', 8);   %zöld kör marker belül pirosra kiszínezve
fprintf('Helyes meresi darab(elso szenzor, esti meres 11-20. napokra: %s\n ', num2str(darab))

a=squeeze(meresiErtekek(2,2,:));
b=squeeze(meresiErtekek(3,2,:));
c=squeeze(meresiErtekek(4,2,:));
a(a<930 | a>1060)=0;
b(b<930 | b>1060)=0;
c(c<930 | c>1060)=0;
A=sum(a)/sum(a~=0);
B=sum(b)/sum(b~=0);
C=sum(c)/sum(c~=0);
fprintf('A deli atlaga az elso szenzornak: %f, a masodik szenzornak: %f,és a harmadik szenzornak: %f ', A, B, C);