result <- rnorm(1000, mean=1, sd=0.5)