clear; clc; format compact; format long;

% zadani
sm = load('meas_dir11.txt'); % seznam mereni
psm = 5;
psk = 3;

% volani fce
[ psi,opr,mpsi,os_red ] = zapisnik(sm,psm,psk);

% output table ------------------------------------------------------------
out_matrix( :, [1:2,3:2:2*psk+1,4:2:2*psk+2,2*psk+3,10] ) = [ sm(1:psm,1:2), os_red, opr, psi, mpsi ];

fprintf( ' st.| cil|     1.sk |   chyba |     2.sk |   chyba |     3.sk |  chyba |   prumer |    std\n')
fprintf( '% 3.0f |% 3.0f |% 9.4f |% 8.4f |% 9.4f |% 8.4f |% 9.4f |% 8.4f|% 9.4f |% 7.4f\n', out_matrix' )