Create Simulation R code