如何在R语言中从两列非NA值生成新的rating列

针对你的需求，这里提供几种简洁的实现方式：

方法1：使用dplyr的coalesce函数 #

coalesce函数的作用是返回每个位置上第一个非NA的值，完美匹配你的场景——x有值时取x，x为NA时取y，两者都为NA则返回NA：

library(dplyr)
test$rating <- coalesce(test$x, test$y)

方法2：基础R实现 #

如果不想加载额外包，可用基础R的方式实现：

用ifelse判断 #

test$rating <- ifelse(!is.na(test$x), test$x, test$y)

用rowSums计算（适配两列不同时非NA的场景） #

因为你的数据中x和y不会同时有值，可直接对每行求和并忽略NA，再修正全NA的情况：

test$rating <- rowSums(test[, c("x", "y")], na.rm = TRUE)
test$rating[is.na(test$x) & is.na(test$y)] <- NA

运行以上任意一种方法后，test$rating的结果都会是：1, 2, 3, 3, 2, NA，符合预期。

内容的提问来源于stack exchange，提问作者jo_