如何在R的across语句中结合列名与前缀实现coalesce操作？

要实现对a1、a2列分别与对应的v_a1、v_a2列做coalesce合并，你可以利用cur_data()在across的函数内部获取当前数据上下文，结合列名拼接来实现需求：

library(dplyr)

df %>%
  mutate(across(c(a1, a2), ~ coalesce(.x, cur_data()[[paste0("v_", cur_column())]])))

代码解释 #

• .x代表当前across遍历到的列（比如第一次是a1，第二次是a2）；
• cur_data()获取当前mutate操作的数据集上下文，避免环境变量混淆；
• paste0("v_", cur_column())生成对应列的名称（比如cur_column()为a1时，生成v_a1）；
• [[ ... ]]从数据框中提取对应列的向量，传递给coalesce完成合并。

你的尝试方案问题分析 #

1. 方案1报错原因：select(matches(...))返回的是数据框，且cur_column()在select的上下文里无法正确识别（select的作用域和across内部的函数作用域不兼容），同时coalesce需要的是向量而非数据框，导致报错。
2. 方案2输出异常原因：内层的across(...)返回的是包含两列的数据框，而coalesce需要接收多个向量参数，将数据框直接传入会导致参数格式不匹配，最终输出异常。

运行结果 #

执行正确代码后，数据集的a1列会变为c(1, 0, 2, 5)，a2列变为c(4, 7, 8, NA)，其他列保持不变，符合预期。

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