%----------------------------------------------------------------------------------
%----------------------------------------------------------------------------------
%DESCRIZIONE: centra i dati nella matrice Mdati levando ad ogni vettore riga la sua
%             media
%----------------------------------------------------------------------------------
%I: dati:=matrice contenente i dati che si vogliono centrare
%
%O: m:=vettore contenente la media di ogni riga
%
%----------------------------------------------------------------------------------
%----------------------------------------------------------------------------------
function [m,dati]=centra(dati)
    m = mean(dati');
    for i=1:size(dati,1)
        dati(i,:)=dati(i,:)-m(i);        
    end
    return;
end