r - data.table の代入 := の右側に名前で変数を渡す

Question

次のように、変数を名前で data.table X に渡したいと思います。

myfunc <- function(varname){
  X[, newVar:= varname]
}
myfunc("oldVar")

どうすればいいですか？で試してみquote()ましeval()たが、うまくいきませんでした。

Answer 1

列をベクトルとして検索し、それを割り当てに使用します。

myfunc <- function(varname){
  X[, newVar := X[[varname]]]
}

X <- data.table(oldVar=1:4, b=5:8)

> myfunc("oldVar")
   oldVar b newVar
1:      1 5      1
2:      2 6      2
3:      3 7      3
4:      4 8      4