替换文本向量中的字符串没有包

Question

我有两个向量：

Param<-c("alpha","beta","theta")
Trend<-c("b","c","ac","bc")

我想把趋势向量的每一项替换为Param向量中的项目，是"a“第一个元素(alpha)，b是第二个(beta)，等等。

预期的结果将是：

Result=("beta","theta","alphatheta","betatheta")

如果可能的话，我不想使用任何软件包，如果没有任何想法是欢迎的:)

Answer 1

带有str_replace的stringr选项，该选项可以使用命名向量进行替换

library(stringr)
str_replace_all(Trend, set_names(Param, letters[1:3]))
#[1] "beta"       "theta"      "alphatheta" "betatheta" 

或者，如果我们不想使用任何包，那么在循环中使用gsub

lts <- letters[1:3]
for(i in seq_along(lts)) Trend <- gsub(lts[i], Param[i], Trend)
Trend