在数据框中,我想从该列的每个元素中减去每列的平均值。R在数据框的每一行和列中应用计算
示例数据帧:
x <- c(1,2,3,4,5,6,7,8,9,10)
y <- c(2,3,2,3,2,3,2,3,2,3)
z <- c(100,200,300,400,500,600,700,800,900,1000)
df <- data.frame(x, y, z)
# get the mean of each column
mu <- colMeans(df)
我想我需要使用sapply
,类似于:
df_norm <- df
df_norm[,1] <- sapply(df[,1], function(x) (x-mu[1]))
df_norm[,2] <- sapply(df[,2], function(x) (x-mu[2]))
df_norm[,3] <- sapply(df[,3], function(x) (x-mu[3]))
,但我无法弄清楚如何写FUN
参数来做到这一点在一行代码中。
现在为什么我没有想到..! – tospig 2014-11-02 00:04:51