1、测试数据



> a <- 1:5
> b <- 3:7
> a
[1] 1 2 3 4 5
> b
[1] 3 4 5 6 7


 

2、取交集



> a %in% b
[1] FALSE FALSE TRUE TRUE TRUE
> a[a %in% b]
[1] 3 4 5
> intersect(a,b) ## 相当于intersect函数
[1] 3 4 5


 

3、取不同值



> !(a %in% b)
[1] TRUE TRUE FALSE FALSE FALSE
> a[!(a %in% b)]
[1] 1 2
> setdiff(a,b) ## 相当于setdiff函数
[1] 1 2