Discussion_Simulation.R