r - 将带有 NA 的列合并到新列并将其附加到现有的 df

Question

我有一个只有几列的数据框，具体两列的标题如下(总共有几千行):

  corprsd1 corprsd2
2        1       NA
3       NA        0
4       NA        0
5        1       NA
6        1       NA
7       NA        0

由于一列中的每一行 NA 总是对应于第二列中的 0 或 1，我想将这些行合并为 1 并将其附加到当前数据帧，以获得类似的结果:

  corprsd1 corprsd2 corcombined
2        1       NA       1
3       NA        0       0
4       NA        0       0
5        1       NA       1
6        1       NA       1
7       NA        0       0

我想这可以通过循环或某些特定函数来完成 - 你能告诉我最好的解决方案吗？我想某些函数会最快，但循环应该更灵活(即我可以更改组合列的条件)。

Answer 1

更简单:

df <- data.frame(
  corprsd1 = c(1, NA, NA, 1, 1, NA),
  corprsd2 = c(NA, 0, 0, NA, NA, 0)
)

df$combined <- rowSums(df, na.rm = T)

产生预期的输出:

  corprsd1 corprsd2 combined
1        1       NA        1
2       NA        0        0
3       NA        0        0
4        1       NA        1
5        1       NA        1
6       NA        0        0