Update sim.QTL.data.R