powered by
zscore(x, na.rm = getOption("na.rm", FALSE))
iris %>% group_by(Species) %>% mutate(zSepal.Length = zscore(Sepal.Length)) %>% head()
Run the code above in your browser using DataLab