clear
clc
format long G
%výpoèet smìrodatné odchylky laserového dálkomìru
A = load ('data_laser.txt');
n = length(A);
%prùmìr
prum = sum(A)/n;
for i = 1:n
      o(i) = prum - A(i);
end
%smìrodatná odchylka
sm_od = sqrt(sum(o.^2)/(n-1))

plot(A(:,1),'r')
title('Test laserového snímaèe "GY-VL53L0X" (80cm)')
xlabel('Poèet mìøení')
ylabel('Mìøená hodnota [mm]')