R语言使用ifelse和is.na按非NA条件重编码变量问题

问题原因分析 #

你的代码存在两个核心错误：

• 逻辑分支设置错误：你需要new_name非NA时用new_name赋值，原代码的ifelse分支刚好写反
• 误用比较运算符==：你原代码里用==做逻辑判断，返回的是TRUE/FALSE逻辑值，而非你需要的赋值结果，ifelse会直接返回对应位置的取值，你只要把返回结果赋值给name列即可。

解决方案 #

基础R写法

使用修正后的ifelse语句：

df$name <- ifelse(is.na(df$new_name), df$name, df$new_name)

运行后结果如下：

df
# A tibble: 4 × 3
     id name       new_name  
  <dbl> <chr>      <chr>     
1   321 Pink       Pink      
2   452 White      NA        
3   564 Black      NA        
4   678 Light blue Light blue

tidyverse简化写法

如果你常用dplyr，还可以用coalesce()函数简化代码，该函数会自动取第一个非NA的取值，完全匹配你的需求：

library(dplyr)
df <- df %>% 
  mutate(name = coalesce(new_name, name))

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