我希望通过减去每组内的平均值来标准化 data.table 中的变量。我是通过以下方式完成的:
dx <- data.table(x=c(1,3,5,1,8,11),group=factor(c(1,1,1,2,2,2)))
dy <- dx[,.(xmean=mean(x)),by=.(group)]
setkey(dx,group)
setkey(dy,group)
dx[dy,x_norm:=x-xmean]
我想知道是否有更简洁的方法来做到这一点?
最佳答案
您可以使用scale
函数来执行此操作:
dx[, x_norm := scale(x, center = TRUE, scale = FALSE), by = group]
这相当于 @Hadd E. Nuff 的方式:
dx[, x_norm := x - mean(x), by = group]
关于r - 标准化变量 data.table,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/36439262/