使用循环和自定义函数替换列中的值-R

# 创建一个示例数据框
df <- data.frame(ID = c(1, 2, 3, 4, 5),
                 Value = c("A", "B", "C", "D", "E"),
                 stringsAsFactors = FALSE)

# 定义一个自定义函数，用于替换特定值
replace_value <- function(data, column, old_value, new_value) {
  for (i in 1:length(data[[column]])) {
    if (data[[column]][i] == old_value) {
      data[[column]][i] <- new_value
    }
  }
  return(data)
}

# 调用自定义函数，替换数据框中的特定值
df <- replace_value(df, "Value", "A", "X")

# 打印替换后的数据框
print(df)