Con los datos de Chu Beasly. Para ejecutar usa el main y cambia el nombre del archivo en la linea 85, sólo ejecuta una vez y muestra el resultado