intersect2(vname, simplifiedname = vname)
a = list(x1 = c("label11", "label12"), x2 = c("label21", "label22", "label23"),
x3 = c("label31", "label32"))
b = list(x1 = c(1, 2), x2 = c(3, 1, 2), x3 = c(2, 1))
intersect2(a, b)
Run the code above in your browser using DataLab