我在分别使用dplyr的tbl_df和常规data.frame时遇到麻烦。我有一个很大的tbl_df(500x30K),需要对其进行过滤。
所以我想做的是:

filter(my.tbl_df, row1>0, row10<0)

这将类似于
df[df$row1>0 & df$row10<0,]

效果很好。但是我需要在运行时动态构建过滤器功能,因此我需要通过一个或多个变量来访问DF / tbl_df列。
我尝试了类似的东西:
var=c("row1","row10")
op=c(">","<")
val=c(0,0)
filter(my.tbl_df, eval(parse(text=paste(var,op,val,sep="")))

这给了我一个错误:与LGLSXP 不兼容
这似乎深深植根于Cpp代码中。

我会很感激任何提示。同时指出“字符串到环境变量”的转换将很有帮助,因为我很清楚自己做错了。

最好的

马里奥

最佳答案

这与此issue有关。同时,一种方法可能是构造整个表达式,即:

> my.tbl_df <- data.frame( row1 = -5:5, row10 = 5:-5)
> call <- parse( text = sprintf( "filter(my.tbl_df, %s)", paste(var,op,val, collapse="&") ) )
> call
expression(filter(my.tbl_df, row1 > 0&row10 < 0))
> eval( call )
  row1 row10
1    1    -1
2    2    -2
3    3    -3
4    4    -4
5    5    -5

10-08 11:51