Update Main.R

Added the step2.