将 NA 重新插入向量中答案

【问题标题】：Re-inserting NAs into a vector将 NA 重新插入向量中
【发布时间】：2010-10-11 18:10:50
【问题描述】：

我有一个包含 NA 的值向量。这些值需要由无法处理 NA 的外部程序处理，因此它们被剥离，将其写入文件，处理，然后读回，从而产生非 NA 数量长度的向量.例如，假设输入是 7 3 4 NA 5 4 6 NA 1 NA，那么输出将只是 7 个值。我需要做的是将 NA 重新插入到位。

所以，给定两个向量 X 和 Y：

 > X
 [1]  64   1   9 100  16  NA  25  NA   4  49  36  NA  81
 > Y
 [1]  8  1  3 10  4  5  2  7  6  9

生产：

8 1 3 10 4 NA 5 NA 2 7 6 NA 9

（您可能会注意到 X 是 Y^2，这只是一个示例）。

我可以敲出一个函数来执行此操作，但我想知道是否有任何巧妙的方法可以做到这一点...拆分、列表、长度...嗯...

【问题讨论】：

虽然只是举例，你有没有试过：sqrt(x)

标签： r vector

【解决方案1】：

na.omit 保留原始系列中NA 位置的属性，因此您可以使用它来知道将缺失值放在哪里：

Y <- sqrt(na.omit(X))
Z <- rep(NA,length(Y)+length(attr(Y,"na.action")))
Z[-attr(Y,"na.action")] <- Y
#> Z
# [1]  8  1  3 10  4 NA  5 NA  2  7  6 NA  9

【讨论】：

【解决方案2】：

回答我自己的问题可能是非常糟糕的形式，但我认为这可能是最简洁的：

rena <- function(X,Z){
Y=rep(NA,length(X))
Y[!is.na(X)]=Z    
Y
}

【讨论】：

可以缩短为function(X,Z) {X[!is.na(X)]<-Z;X}。

【解决方案3】：

也可以试试替换：

replace(X, !is.na(X), Y)

【讨论】：

【解决方案4】：

同一主题的另一个变体

rena <- function(X,Z){
    X[which(!is.na(X))]=Z    
    X
}

R 自动用 NA 填充其余部分。

编辑：由 Marek 更正。

【讨论】：

错误：rena(c(1,2,NA),c(10,20))。为什么要打扰Y，使用X，就像我对Spacedman 回答的评论一样。