r - 逐个元素组合两个向量

Question

我有2个向量，例如:

A <- c(1,2,NA,NA,NA,NA,7)
B <- c(NA,NA,3,4,NA,NA,7)

我想将它们组合起来，以便得到的矢量是

1,2,3,4,NA,NA,-1

那是

当位置i的任一向量中只有1个值(例如X)存在(另一个为NA)时，新向量应在位置i取值X。

当两个值在位置i处均为NA时，新矢量应在位置i处采用值NA

当两个向量在位置i处都有值时，新向量在位置i处应值为-1。

我可以轻松地通过循环执行此操作，但是在大型数据集上它非常慢，因此任何人都可以提供一种快速的方法来执行此操作吗？

Answer 1

这些命令创建向量:

X <- A
X[is.na(A)] <- B[is.na(A)]
X[is.na(B)] <- A[is.na(B)]
X[!is.na(A & B)] <- -1

#[1]  1  2  3  4 NA NA -1