r - 比较两个矩阵 (A & B) 并输出一个新的矩阵 C，其中 cij = min(aij, bij)

Question

标题相当清楚，但我试图取两个矩阵 A 和 B，并输出一个矩阵 C，该矩阵具有两个矩阵中的最小元素。

cij = min(aij, bij)

这就是我正在考虑这样做的方式:

C <- matrix(ncol = ncol(A), nrow = nrow(A), 0)
for (i in 1:ncol(C)) {
    Y <- rbind(A[i,], B[i,])
    C[i,] <- apply(Y, 2, min)
}

但是，我希望这可以被矢量化，但我不知道该怎么做。我还没有找到任何东西，所以如果有人有任何想法，我将不胜感激。

谢谢!

Answer 1

见 ?pmin (并行最小值):

R> A <- matrix(1:4, 2, 2)
R> B <- matrix(c(5, 1, 1, 6), 2, 2)
R> A
     [,1] [,2]
[1,]    1    3
[2,]    2    4
R> B
     [,1] [,2]
[1,]    5    1
[2,]    1    6
R> pmin(A, B)
     [,1] [,2]
[1,]    1    1
[2,]    1    4