% :::::::::::::::::::::::::::: Log-Normal  example:  80 Honigproben  :::::::::::::::::::::::::::::::::::::::::::::::::
clear all; close all; clf;
set(gcf,'color', [0.55 0.55 0.44]);
disp(['°°°°°°°°°°°°° S T A R T °°°°°°°°°°°° ' ,date, ' °°°°°°°°°°°°°°'])
% ::::::::::::::::::::::::::::::::::::::::::::Hydroxymethyfurfurolgehalt im Honig :::::::::::::::::::::::::::::::::::::::::
% ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: HMF [mg/100g] ::::
x  = [ 1.31 1.62 1.88 0.86 1.95 2.55 5.91 2.41 2.83 1.11 ...
        3.31 2.90 1.01 1.17 2.08 7.47 2.80 1.83 2.71 1.83 ...
        1.55 2.10 0.94 1.14 9.41 2.88 4.99 2.29 1.84 5.45 ...
        1.87 3.97 0.61 5.58 2.11 3.44 3.12 1.43 0.27 0.45 ...
        3.50 2.93 3.18 1.72 2.45 1.19 2.56 0.80 1.53 1.34 ...
        3.75 2.20 0.76 3.18 0.93 1.09 2.01 2.70 3.60 0.57 ...
        0.89 1.08 0.84 1.08 0.96 2.77 1.47 4.82 1.14 1.24 ...
        4.06 1.79 1.81 0.89 2.73 6.01 2.96 1.66 0.70 1.58]';
% ::::::::::::::: Log-Data :::::::::::::
xlog = log(x);
% ::::::::::::::::::: Hist - Data ::::::
[n xh ] = hist(x,10);
[nlog xlogh] = hist(xlog,10);
% ::::::::::::::::::::: Vgl. : hist:::
binA = sum((x<=1) & (x>0));
binB = sum((x<=2) & (x>1));
for k = 1:10
    bins(k)= sum((x<=k) & (x>k-1));                  % lt.Book 10 Kl. : 14,28,20,9,3,3,1,1,0,1
end
bins      
% ::::::::::::::::::::: Vgl. : log-hist:::
Klass = [-1.5 -1]

for k = 1:10
   % Logbins(k) = sum((x<=k) & (xL10>k-1));     %
end
% Logbins
% ::::::::::::::::::
subplot(221)
   bar(xh,bins,'g-')
   set(gca,'color', 'none','Fontweight', 'bold', 'Fontsize', 12);
   str5 = {' Log-Normal''  '}; 
   str6 = {' Honig - Saft.'}; 
   hT = title([str5 str6],'Fontsize', 14);
   grid 
% :::::::::::::::::::
subplot(222)
   bar(xlogh, nlog,'c')
   set(gca,'color', 'none','Fontweight', 'bold', 'Fontsize', 12);