changed x from normal to uniform(0,1) variable, and made abline a red line instead of black
added cat(date())
added a new line after printing out date, and changed the point type for the scatterplot