Sostituito for con sapply
Cambiati indici numerici con variabile