> a=matrix(round(rnorm(9,3,1),0),3,3)
> a
     [,1] [,2] [,3]
[1,]    2    3    2
[2,]    3    3    1
[3,]    1    4    2
> apply(a,2,scale)
     [,1]       [,2]       [,3]
[1,]    0 -0.5773503  0.5773503
[2,]    1 -0.5773503 -1.1547005
[3,]   -1  1.1547005  0.5773503

> a=matrix(round(rnorm(9,3,1),0),3,3)
> a
     [,1] [,2] [,3]
[1,]    2    2    1
[2,]    3    3    3
[3,]    3    3    4
> apply(a,2,scale)
           [,1]       [,2]       [,3]
[1,] -1.1547005 -1.1547005 -1.0910895
[2,]  0.5773503  0.5773503  0.2182179
[3,]  0.5773503  0.5773503  0.8728716

mt <- matrix(1:10, 5)
scale(mt, center = TRUE,  scale = TRUE)
scale()默认是按列进行标准化的

感谢感谢。

谢谢，