2つの変数を使用してdata.tableをフィルタリングする、エレガントで高速な方法

Question

複数の変数の組み合わせに応じてフィルタリングする方法があるかどうか尋ねます。

library(dplyr) 
library(plyr) 
library(data.table) 

data <- iris %>% cbind(group = rep(c("a", "b", "c"), nrow(iris))) %>% as.data.table() 

    Sepal.Length Sepal.Width Petal.Length Petal.Width Species group 
1:   5.1   3.5   1.4   0.2 setosa  a 
2:   4.9   3.0   1.4   0.2 setosa  b 
3:   4.7   3.2   1.3   0.2 setosa  c 
4:   4.6   3.1   1.5   0.2 setosa  a 
5:   5.0   3.6   1.4   0.2 setosa  b 
6:   5.4   3.9   1.7   0.4 setosa  c 

と私はそのようにすることを行うことができ

filter <- data.table(Species = c("setosa", "versicolor", 'setosa'), group = c('a', "b", 'c')) 
     Species group  filter1 
1:  setosa  a  setosa a 
2: versicolor  b versicolor b 
3:  setosa  c  setosa c 

次のDataTableに基づいてそれらをフィルタリングする：具体的には

data[paste(Species, group) %in% filter[, filter1 := paste(Species, group)]$filter1] 

私はしたいと思いますががあるかどうかを知るより効率的に/より速く/簡単に行う方法： おそらく：

この場合、

data[.(Species, group) %in% filter] # does not work 

Answer 1

、あなたが同様のフィルタリングを参照してください Perform a semi-join with data.table

data[filter, on=names(filter), nomatch=0] 

を行うことができます結合します。