% Questa funzione mira a valutare se effettivamente l'iperpiano ottimale
% scelto dagli algoritmi non ideali è ottimo ad ogni passo e quindi se
% massimizza le distanze dei relativi due gruppi di punti da quest'ultimo.

function [] = confr(dist_test,dist_ideale)

% calcolo l'errore assoluto tra le distanze reali e quelle ideali dei due
% gruppi di punti
% errore assoluto
err_r = abs(dist_test(:,1) - dist_ideale(:,1));
err_b = abs(dist_test(:,2) - dist_ideale(:,2));

x = 1:length(dist_test);

% plot errore assoluto
figure()
hold on
plot(x,err_r,'r')
plot(x,err_b,'b')
title('Errore assoluto tra test e ideale')
legend('Errore assoluto p.ti rossi/ideale','Errore assoluto p.ti blu/ideale',2)
axis([1 length(dist_test) 0 50])
grid on
hold off

% plot distanze relative
figure()
hold on
plot(x,dist_test(:,1),'r')
plot(x,dist_test(:,2),'b')
plot(x,dist_ideale(:,1),'k')
legend('Dist.retta/punti rossi','Dist.retta/punti blu','Dist.ideale',4)
title('Distanze ottimali a confronto')
axis([1 length(dist_test) 0 200])
grid on
hold off

end