r - 文字列のペアワイズ置換を効率的に行う方法

Question

係数名のリストがあり、専門用語をより適切なラベルに置き換えたいと考えています。関数呼び出しは次のようになります

replace.pairwise(list("coef1","coef2"),
                 coef1="price",coef2="eventdummy", coef3="income")

そして戻るべきです

"price"      "eventdummy"

Answer 1

私のために働いた機能は

replace.pairwise=function(listofstrings,...){
  ss=c(unlist(listofstrings))
  pairs=list(...)

  for(s in 1:length(ss)){
    for(p in 1:length(pairs)){
      ss[s]=gsub(names(pairs)[p],pairs[p],ss[s])
    }  
  }
  ss
}

それが最も効率的な方法ではないと確信していますが、うまくいきます。R の多くのパッケージの 1 つに既に隠されている何かをプログラムしたのだろうか...