A <-data.frame(id=c(1:10))
   id
1   1
2   2
3   3
4   4
5   5
6   6
7   7
8   8
9   9
10 10

B <-data.frame(id=c(1:5))
  id
1  1
2  2
3  3
4  4
5  5

A$id[A$id %in% B$id]  #找出A中与B相同的元素
[1] 1 2 3 4 5

A$id[!A$id %in% B$id] #找出A中与B不同的元素
[1]  6  7  8  9 10