R:合并同一变量的副本

Question

我在 R 中有这样的数据:

subjID = c(1,2,3,4)
var1 = c(3,8,NA,6)
var1.copy = c(NA,NA,5,NA)
fake = data.frame(subjID = subjID, var1 = var1, var1 = var1.copy)

看起来像这样:

> fake
  subjID var1 var1.1
1      1    3     NA
2      2    8     NA
3      3   NA      5
4      4    6     NA

Var1 和 Var1.1 代表相同的变量，因此每个受试者的一列都有 NA，另一列有一个数值(没有人有两个 NA 或两个数字)。我想合并列以获得单个 Var1:(3,8,5,6)。

关于如何执行此操作有任何提示吗？

Answer 1

如果您只处理两列，并且从不有两个数字或两个 NA，您可以计算行平均值并忽略缺失值:

fake$fixed <- rowMeans(fake[, c("var1", "var1.1")], na.rm=TRUE)