Create MovementSimulationScenario.R