Ejercicio, feeding the data to R