输入三个向量：

> a=c(3,5,7)

> b=5:9

> c=seq(3,7,2)

> d=c(3L,5L,7L)

检查向量中是否有某元素

> is.element(2,a)
[1] FALSE
> is.element(3,a)
[1] TRUE
> 3 %in% a
[1] TRUE

取交集

> intersect(a,b)
[1] 5 7

取并集

> union(a,b)
[1] 3 5 7 6 8 9

取差集

> setdiff(a,b)
[1] 3
> setdiff(b,a)
[1] 6 8 9
> setdiff(b,b)
integer(0)

检查两向量是否相同

> setequal(a,b)
[1] FALSE
> setequal(a,c)
[1] TRUE

> d=c(3L,5L,7L)
> setequal(a,d)
[1] TRUE

检查a是否为b的子集

> all(a %in% b)
[1] FALSE