Update simulate_experiment.R

Changed strand_error_rate default to zero