update Analisi.R