% Importazione dei dati dentro MATLAB

X = readtable("benessereSPM.xlsx", 'Sheet','X (database originale)','range','A3:J106','ReadRowNames',true);


%
% Grafico a dispersione della colonna tra i dati della colonna i e della colonna j con j=1, 2, ..., 7 con le colonne selezionabili tramite sliders

% Colonne i e j da inserire nel grafico definite come sliders
i=2;
j=4;

plot(X{:,i},X{:,j},'o')
% Titolo sull'asse x
xlabel(X.Properties.VariableNames(i))
% Titolo sull'asse y
ylabel(X.Properties.VariableNames(j))
% Aggiungo al grafico le etichette dei punti
text(X{:,i},X{:,j},X.Properties.RowNames)

% Grafico a dispersione della colonna tra i dati della colonna i e della colonna j con j=1, 2, ..., 6 con le colonne selezionabili tramite caselle a discesa

% Colonne i e j da inserire nel grafico definite come sliders
% Variabile da inserire sull'asse x
  i=  2
% Variabile da inserire sull'asse y
  j=  3

plot(X{:,i},X{:,j},'o')
% Titolo sull'asse x
xlabel(X.Properties.VariableNames(i))
% Titolo sull'asse y
ylabel(X.Properties.VariableNames(j))
% Aggiungo al grafico le etichette dei punti
text(X{:,i},X{:,j},X.Properties.RowNames) 
% Aggiungo al grafico il valore del coefficiente di correlazione tra le due
% variabili selezionate
% Calcolo il coefficiente di correlazione
rxy=corrcoef(X{:,i},X{:,j});
% La funzione num2str converte il numero in stringa in modo da poterlo
% concatenare con la frase di testo "Correlazione='
title(['Correlazione=' num2str(rxy(1,2))])




