如何使用索引替换矩阵的一行

Question

我想用单行向量代替 R 中矩阵的某些行。这是一个示例。
我想将“5,6”行替换为 A 中条目为 1 的行。所以，我想让“A”看起来像“A_goal”

我尝试的方法（见底线）很接近，但它似乎是在“列向下”而不是跨行写入。

A=matrix(c(1,2,1,3,1,2,1,3),4,2)
B=matrix(c(5,6),1,2)
A_goal = matrix(c(5,2,5,3,6,2,6,3),4,2)
A
B
A_goal

# Here is an attempt that didn't work:
A[A==1]=B
A

Answer 1

使用{<- 的矩阵索引是通过列主排序完成的。因此，您可能需要逐行使用 apply。这本质上是对 A 行的 for 循环。您还需要转置，因为 apply 也会将结果作为列传递：

 t(apply(A, 1, function(x) if(x[1]==1){B}else{x}))
     [,1] [,2]
[1,]    5    6
[2,]    2    2
[3,]    5    6
[4,]    3    3

如果您只打算在行 c(1,1) 的地方进行替换，则需要将逻辑测试修改为 x == c(1,1)