R：使用其他两个矩阵的数据填充矩阵，使用条件

我是新来的

R

。我有两个矩阵：

Amat<-matrix(data=c(11:20,NA,NA,NA,NA,25:30),nrow = 4,ncol = 5)

Bmat<-matrix(data=c(1:6,NA,NA,NA,NA,11:20),nrow = 4,ncol = 5)

i、 e.

Cmat

如果两个矩阵（

Amat

&

Bmat

）没有

NA

，则应在相应位置填入“1”。

---

有谁能帮我在不走弯路的情况下解决这个问题吗？提前谢谢

我们可以通过将逻辑矩阵（

！is.na（Amat）&！is.na（Bmat）

）强制为二进制（

+

）来实现这一点

或

---

欢迎来到StackOverflow。请看这里

if(is.na(Amat)!="TRUE" && is.na(Bmat)!="TRUE") {1} else {0}

Cmat <-  +(!is.na(Amat) & !is.na(Bmat))
Cmat
#     [,1] [,2] [,3] [,4] [,5]
#[1,]    1    1    0    0    1
#[2,]    1    1    0    0    1
#[3,]    1    0    0    1    1
#[4,]    1    0    0    1    1

 +(!is.na(Amat*Bmat))

+(!is.na(Amat + Bmat))