### Zscore transformation (mean=0, std=1). Saves the column to your data frame (dat2$)

dat2$ZAGE<-scale(dat2$AGE, center=TRUE, scale=TRUE)