% Importazione dei dati dentro MATLAB

X = readtable("cogradrip.xlsx", 'Sheet','Cograd-gradi-ripetuti','range','C1:E26','ReadRowNames',false);
% L'opzione ReadRowNames è impostata su false in quanto non importo la colonna B di Excel che contiene i nomi delle righe
% 
% Mostro la table X che è stata caricata dentro MATLAB
disp(X)

%
% Calcolo della matrice di cograduzione e dei relativi p-value

% Utilizzo l'opzione Type della funzione corr
[R,Pval]=corr(X{:,:},'Type','Spearman');
disp('Matrice di cograduazione')
disp(R)
disp('Matrice dei p-values')
disp(Pval)
% La matrice dei p-values contiene tutti valori vicini allo zero.
% Rifiuto decisamente l'ipotesi nulla di assenza di cograduazione tra le
% diverse coppie di variabili

%
% Mostro le matrici di cograduazione con le intestazioni

% Trasformo le matrici di double covX e corY in table aggiungendo le
% etichette di riga e di colonna
Rtable=array2table(R,"RowNames",X.Properties.VariableNames,"VariableNames",X.Properties.VariableNames);
Pvaltable=array2table(Pval,"RowNames",X.Properties.VariableNames,"VariableNames",X.Properties.VariableNames);

disp('Matrice di cograduazione con intestazioni')
disp(Rtable)
disp('Matrice del p-value del test di assenza di cograduazione con intestazioni')
disp(Pvaltable)

%