R语言中找交集、并集、找不同、判断是否相同

 

1、交集intersect

> x <- 1:4
> y <- 3:7
> x
[1] 1 2 3 4
> y
[1] 3 4 5 6 7
> intersect(x,y)
[1] 3 4

 

2、并集union

> x <- 1:4
> y <- 3:7
> x
[1] 1 2 3 4
> y
[1] 3 4 5 6 7
> union(x,y)
[1] 1 2 3 4 5 6 7

 

3、找不同setdiff

> x <- 1:4
> y <- 3:7
> x
[1] 1 2 3 4
> y
[1] 3 4 5 6 7
> setdiff(x,y)
[1] 1 2
> setdiff(y,x)
[1] 5 6 7

 

4、判断是否相同setequal

> x <- 1:4
> y <- 3:7
> x
[1] 1 2 3 4
> y
[1] 3 4 5 6 7
> setequal(x,y)
[1] FALSE
> z <- 3:7
> setequal(x,z)
[1] FALSE
> setequal(y,z)
[1] TRUE