This function returns the intersection for the n objects in argument
intersectg(...)
...
The objects to compare
A vector of intersection between the n objects
EMA group
a<-1:10 b<-2:7 c<-5:8 intersectg(a,b,c)