如何正确地将函数传递给data.table中的j参数？

Question

我正在编写一个简单的函数，旨在将其传递给下面的data.table中使用：

pget <- function(...) get(paste0(...))

但是当我尝试代码时：

x <- data.table(y=seq(10))
x[,pget('y')]

我遇到一个错误。

Error in get(paste0(...)) : object 'y' not found

但是，如果我只输入：

x[,get(paste0('y')]

我没有任何错误。

赞赏任何想法或指示。