Edited at

Rで正規表現に検索ワードと置換ワードをベクトルで指定する

More than 5 years have passed since last update.

ベクトルそのものを使っているわけじゃないけど...

> library(gsubfn)

要求されたパッケージ proto をロード中です
要求されたパッケージ tcltk をロード中です

> # 検索ワードとその置き換えワードをベクトルとして指定する

> x1 <- c("宮内れんげ", "一条蛍", "越谷小鞠", "越谷卓", "越谷夏海")
> y <- list(夏 = "秋", 小 = "大", れん = "げん")
> gsubfn("夏|小|れん", y, x1)
[1] "宮内げんげ" "一条蛍" "越谷大鞠" "越谷卓" "越谷秋海"

> x2 <- c("宮内れんげ一条蛍越谷小鞠越谷卓越谷夏海")
> gsubfn("夏|小|れん", y, x2)
[1] "宮内げんげ一条蛍越谷大鞠越谷卓越谷秋海"

> # リストからパターンを作成
> y0 <- paste(names (y), collapse = "|")
> gsubfn(y0, y, x1)
[1] "宮内げんげ" "一条蛍" "越谷大鞠" "越谷卓" "越谷秋海"