Create SimpleSim.R