R语言如何按其他列条件替换数据框单元格内的指定文本

原代码存在三个核心问题，导致无法得到预期结果：

• 条件判断的列名、值写错：数据框中对应列名是mode，不是代码里写的mile；需要匹配的列值是first mile，不是代码中写的first/last mile，条件从根源上就没有命中目标行。
• 匹配规则错误：R中==是全值精确匹配，df$Route == "*train*"只会匹配单元格内容完全等于*train*的行，完全无法识别内容中包含train子串的记录；且普通字符串里的*没有模糊通配的作用，不能用来做包含匹配。
• 替换逻辑错误：需求是替换单元格内的train子串，不是把整个Route单元格的内容直接替换成public transport，原ifelse的替换分支会直接覆盖整格内容，不符合需求。

直接用R内置函数即可实现，不需要安装额外依赖包：

# 筛选出mode列值为first mile的目标行
target_rows <- df$mode == "first mile"
# 对目标行的Route列做全局子串替换，将所有"train"替换为"public transport"
df$Route[target_rows] <- gsub(
  pattern = "train",
  replacement = "public transport",
  x = df$Route[target_rows],
  fixed = TRUE
)

运行后得到的数据框结果如下，完全符合需求：

说明：gsub()是R内置的全局字符串替换函数，参数fixed = TRUE表示直接按字面文本匹配train，不启用正则解析，运行效率更高，也不会出现意外匹配的问题。

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