corrected set.seed errors