powered by
MATH
str(MATH) attach(MATH) hist(math,col="pink") CharlieZ <- (62-mean(math))/sd(math) CharlieZ detach(MATH) remove(CharlieZ)
Run the code above in your browser using DataLab