R中找不同找相同

> rm(list=ls())

> #生成示例向量
> a=sample(1:15,size = 5,replace = F);a
[1] 15  3 14 10  2
> b=sample(1:10,size = 5,replace = F);b
[1]  6  5  4 10  7
> c=sample(1:8,size = 5,replace = F);c
[1] 1 2 3 5 6
> 
> #交集
> ##两个向量的交集
> intersect(a,b)
[1] 10
> 
> #并集
> union(a,b)
[1] 15  3 14 10  2  6  5  4  7
> 
> ##多个向量
> Reduce(intersect, list(a, b, c))
integer(0)
> Reduce(union, list(a, b, c))
 [1] 15  3 14 10  2  6  5  4  7  1
> 
> #找不同
> ##a中不同于b的
> setdiff(a,b)
[1] 15  3 14  2
> 
> ##b中不同于a的
> setdiff(b,a)
[1] 6 5 4 7
> 
> #判断是否相同（不同的判断返回值不同）
> identical(a,b)
[1] FALSE
> 
> match(a,b)#返回值为b的下标
[1] NA NA NA  4 NA
> 
> a %in% b
[1] FALSE FALSE FALSE  TRUE FALSE
>