NDE=0; % non detected errors (%)

%p=[1e-3 2e-3 3e-3 4e-3 5e-3 6e-3 7e-3 8e-3 9e-3 1e-2 2e-2 3e-2 4e-2 5e-2 6e-2 7e-2 8e-2 9e-2 1e-1 2e-1 3e-1 4e-1];
p=[1e-2 2e-2 3e-2 4e-2 5e-2 6e-2 7e-2 8e-2 9e-2 1e-1 2e-1 3e-1 4e-1];

p=fliplr(p);
eta=700000;
% Ako ti pukne matlab onda smanji na 800000 ili eventualno na 400000. 
% Manje od toga je besmisleno i onda bi morala da dodjes u septembru da to radimo u lab 117

for i=1:length(p)
    N=eta*round(1/p(i)); 
    NDE(i)=konacnoCRC_15_7(N,p(i));
    [p(i), NDE(i)]
end
p=fliplr(p);
NDE=fliplr(NDE);
[p' NDE']
loglog(p,NDE,'-ob','LineWidth',3)
hold on
loglog(p,p*100,'-or','LineWidth',3)
grid
title('Verovatnoca nedetektovane greske (NDE)')
ylabel('NDE (%)')
xlabel('Verovatnoca greske u kanalu')
hold off