Create egglayingSimulation.R