使用stringr的str_replace_all实现多向量模式替换遇错求助

问题根源 #

1. 变量名错误：代码里误用了未定义的replace变量，实际应该用你定义好的words_to_replace。
2. 替换逻辑错误：把待替换词和替换值分别拼接成|分隔的字符串，会导致所有匹配到的词都被替换成b|p|pe，而非逐个对应替换。

正确实现代码 #

library(stringr)

# 初始化数据框（补全你漏写的strings定义）
strings <- data.frame(
  old = c("apple banana orange", "peach apple orange", "apple orange pear", "orange apple banana", "apple orange peach")
)
words_to_replace <- c("banana", "peach", "pear")
replacements <- c("b", "p", "pe")

# 创建命名替换规则：名字为待替换词，对应值为替换内容
replace_rules <- setNames(replacements, words_to_replace)

# 执行批量对应替换
strings$new <- str_replace_all(strings$old, replace_rules)

# 查看结果
strings$new

结果验证 #

运行后会得到你期望的输出：

[1] "apple b orange"   "p apple orange"   "apple orange pe"  "orange apple b"   "apple orange p"

原理说明 #

str_replace_all支持传入命名向量作为替换规则：向量的名称是需要匹配的模式，对应的值是替换后的内容，能精准实现“列表A元素对应替换为列表B对应位置元素”的需求。

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