我在使用 data.table 进行练习时遇到了问题。这是我的问题。我写了一个简单的减法函数:
minus <- function(a, b){
return(a - b)
}
我的数据集是一个简单的 data.table:
dt <- as.data.table(data.frame(first=c(5, 6, 7), second=c(1,2,3)))
dt
first second
1 5 1
2 6 2
3 7 3
我想写另一个函数,
myFunc <- function(dt, FUN, ...){
return(dt[, new := FUN(...)])
}
用法很简单:
res <- myFunc(dt, minus, first, second)
结果如下:
res
first second new
1: 5 1 4
2: 6 2 4
3: 7 3 4
我怎样才能实现这样的目标?谢谢!