如何在R语言中根据列值修改数据框单行对应位置的值

先把你提供的原始数据用R代码还原：

df <- data.frame(
  id = 1:6,
  X1 = c(5,4,7,8,1,5),
  X2 = c(5,NA,1,2,5,7),
  X3 = c(6,NA,3,4,NA,7),
  X4 = c(NA,NA,5,2,NA,7),
  X_final = c(6,4,5,2,5,7),
  X_final_location = c("X3","X1","X4","X4","X2","X4"),
  stringsAsFactors = FALSE
)

方法一：用dplyr（tidyverse风格） #

加载dplyr包后，通过按行处理动态替换指定列的内容：

library(dplyr)

df_processed <- df %>%
  rowwise() %>%
  mutate(!!sym(X_final_location) := ".") %>%
  ungroup()

• rowwise()：让数据框按行单独执行后续操作
• sym()：把X_final_location里的字符型列名转换成可直接引用的列对象
• !!：解引用列对象，实现动态指定目标列并赋值

方法二：Base R 循环实现 #

如果不想加载额外包，用基础循环也能完成需求：

for (i in seq(nrow(df))) {
  target_col <- df$X_final_location[i]
  df[i, target_col] <- "."
}

遍历每一行，根据X_final_location定位目标列，直接替换对应单元格内容。

处理后的数据列会自动从数值型转为字符型（因为混合了数值、NA和"."），最终结果和你想要的输出格式完全一致。

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