1、直接测试
a <- 1:5 b <- 3:8 a b setdiff(a, b) ##左侧唯一 setdiff(b, a) ##右侧唯一 intersect(a, b) ##交集 union(a, b) ##并集