Create sim_2.R