transform all columns in a data frame with dplyr?

Question

Suppose I have a data frame that looks something like this:

set.seed(9782)
df1 <- data.frame(X1 = rnorm(100, mean=123, sd=6),
                  X2 = rnorm(100, 567, 21),
                  X3 = rnorm(100, 783, 82))

I want to rescale all the columns of df1. I can do it with the following code:

means <- apply(df1, 2, mean)
sds   <- apply(df1, 2, sd)  
df1Rescaled <- data.frame(t(t(t(t(df1) - means)) / sds))

How can I do the same with dplyr?

Answer 1

We can use scale

df1New <- df1 %>%
            mutate_each(funs(scale))