% Primerjava Hagerjeve cenilke za 1-normo z pravo 1-normo
% pri cemer gredo obcutljivosti testnih primerov od 1 do 1e12

poskusov=500;

steps=0;
baza=1e12^(1/poskusov);
for k=1:poskusov
    A=condmat(50,baza^k,k);
    [y,korak]=hager(A);
    napaka(k)=y/norm(A,1);
    steps=steps+korak;
end
plot(log(baza.^(1:poskusov))/log(10),napaka,'.')
povprecje=steps/poskusov