sim.pastor function

Simulate data according to one of the scenarios considered in Pastor-Barriuso et al 2003