r - 如何将矩阵中的每个值与对应列的最大值相除

Question

例如

m <- matrix(c(1:9),3,3)

每列的最大值将是...

n <- matrix(c(3,6,9),1,3)

然后我如何执行操作，以使输出为 3 x 3 矩阵，其值： 0.33,0.66,1 在第一列（因为第一列除以 3） 0.66,0.83,6 在第二列（当第二列除以 6) 0.77, 0.88, 9 在第三列中 (当第三列除以 9)。

标签： rmatrix

Answer 1

col我们可以通过'm'来复制 'n '

m/n[col(m)]
#         [,1]      [,2]      [,3]
#[1,] 0.3333333 0.6666667 0.7777778
#[2,] 0.6666667 0.8333333 0.8888889
#[3,] 1.0000000 1.0000000 1.0000000