Update Main.R

Corregí algunos errores del step1