intersectList(x)
list
a <- list (x=1:5,y=3:4,z=c(1,3,3)) intersectList(a)
Run the code above in your browser using DataLab