试试dplyr包加字符串

> bb<-read.table("clipboard",head=T)
> bb
col1 col2 col3
1     1    a    1
2     1    b    2
3     1    c    2
4     1    d    1
5     2    a    2
6     2    c    2
7     3    a    2
8     3    b    1
9     4    c    1
10    5    b    1
11    5    d    2
12    5    d    2
13    6    g    2
14    6    c    1
15    6    j    2

Source: local data frame [6 x 3]
Groups: col1 [4]

   col1   col2  col3
  <int> <fctr> <int>
1     1      a     1
2     1      b     2
3     2      a     2
4     3      a     2
5     3      b     1
6     5      b     1

简单的逻辑运算就可以。假设对象为数据框或矩阵A，第1列用x表示，第2列用y表示。生成新的对象B,代码如下：B<-A[A$x ==a ｜A$x ==b, ]

上面代码中，方括号Ax之间的美元符号无法显示，应当有美元符号