Update run_analysis.R

Se agrega espacio en renglón 21