Update simScript6.R