如何在R中按条件索引dataframe指定行列并完成值替换

错误原因：原有代码中df_a$spc_col的写法存在逻辑问题，$操作符后接的字符会被直接识别为数据框的字面列名，不会解析为你提前定义的、存储了目标列名的变量，因此代码实际在调用df_a中不存在的spc_col列，无法完成赋值操作。

base R 解决方案：
直接在方括号的列索引位置传入存储列名的变量即可，不需要加df_a$前缀：

# 正确赋值写法
df_a[df_a$col1 == spc_col1_val, spc_col] <- repl_val

如果需要提升代码健壮性，避免无匹配行时报错，可以补充行存在性判断：

# 可选优化写法
match_rows <- df_a$col1 == spc_col1_val
if (any(match_rows)) {
  df_a[match_rows, spc_col] <- repl_val
}

dplyr 动态列名解决方案（适合tidyverse技术栈）：
如果你习惯使用dplyr语法，可以用以下写法适配动态生成的列名：

library(dplyr)
df_a <- df_a %>%
  mutate(!!sym(spc_col) := ifelse(col1 == spc_col1_val, repl_val, !!sym(spc_col)))

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