R tidyverse按分组在ID为NA时将Name列NA替换为同列非空值拼接

• 你的代码报错有两个核心原因：
  1. replace_na()的替换值参数仅支持传入固定值，无法直接读取分组上下文动态计算结果
  2. 写法.Name是错误的列引用方式，同时你没有增加「仅ID列为NA时才替换Name的NA」的判断逻辑

首先加载tidyverse套件：

library(tidyverse)

实现逻辑：先按Group分组，生成分组内非NA的Name拼接字符串，再按ID是否为NA的条件替换对应行的Name值：

y <- x %>%
  group_by(Group) %>%
  mutate(
    # 生成分组内非NA的Name拼接结果
    group_name_paste = paste(unique(na.omit(Name)), collapse = " "),
    # 按条件替换
    Name = case_when(
      # ID为NA时，Name是NA就替换为拼接值，否则保留原值
      is.na(ID) ~ coalesce(Name, group_name_paste),
      # ID不为NA时直接保留原Name值（即使是NA也不修改）
      TRUE ~ Name
    )
  ) %>%
  # 删掉临时辅助列
  select(-group_name_paste) %>%
  ungroup()

运行后输出的y和你期望的结果完全一致：

print(y)
# A tibble: 6 × 3
  Group    ID Name    
  <chr> <dbl> <chr>   
1 A         1 Bob     
2 A         2 Jane    
3 A         3 NA      
4 A        NA Bob Jane
5 B        NA Tim     
6 B         5 Tim  

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