PJOssenbruggen fixed sbs.simulate.R