用新值替换矩阵的值

Question

我有一个数字数据矩阵，如下所示： （矩阵）

            Sample1     Sample2       Sample3         Sample4

BD.1809   0.4275       -1.034         0.857757         -1.43362
BD.911    0.4455       -1.456         -0.472828        -0.643979
BP.12     0.03642      -0.9054        1.03334          -0.02428
BS.114    -0.3262      4.677          -0.92514         -0.2435
BS.130    -0.2335      -0.8661        -1.21435         -0.9759
BS.376    0.1937       -1.043         -0.320004        -0.691325

我使用以下代码Mean<-mean(Matrix)

计算了均值

如何用平均值替换矩阵中的每个值？

任何人都可以给我一些如何做到这一点的提示吗？行名和列名是未知的，因为值本身和矩阵的大小。

Answer 1

m <- matrix(1:10,nrow=2)
> m
     [,1] [,2] [,3] [,4] [,5]
[1,]    1    3    5    7    9
[2,]    2    4    6    8   10

> mean(m)
[1] 5.5
> m[,] <- mean(m)
> m
     [,1] [,2] [,3] [,4] [,5]
[1,]  5.5  5.5  5.5  5.5  5.5
[2,]  5.5  5.5  5.5  5.5  5.5