13- Simulation using R and RMark