powered by
normalize(x)
x
x <- runif(20, 50, 110) x.norm <- normalize(x) mean(x) mean(x.norm) sd(x) sd(x.norm)
Run the code above in your browser using DataLab