r - Gsub 一个列表，列表在一个向量上

Question

我有一个存储为的句子列表data。对于列表中的每个句子，我想将在 中找到的任何单词替换为 中to_replace的相应条目replace_with。

我构造了一个简单的函数：

gsub.mult <- function(n) {
  obj <- gsub(to_replace[n], replace_with[n], data)
  return(obj)
}

然后我可以尝试在索引的长度上应用

lapply(seq_along(to_replace), gsub.mult)

然而，当然，这只是返回一个长度为 to_replace 的列表，其中包含每个只有一个 gsub 的句子的原始列表。这是因为每次原始句子列表都会传递给 gsub.mult。

我怎样才能构造一个函数/应用，它将前一个应用传递给下一个？

标签： r