rSimulation() and dataPlots()