obj1<-IdMap(examples$identDfList[[1]]);
obj2<-IdMap(examples$identDfList[[2]]);
#intersection
mergedObj<-merge(obj1,obj2,intersect);
rbind(dim(obj1),dim(obj2),dim(mergedObj));
#difference
mergedObj<-merge(obj1,obj2,setdiff);
rbind(dim(obj1),dim(obj2),dim(mergedObj));
#union using the static call
mergeObj<-IdMap$merge(examples$identDfList,union,verbose=TRUE);
Run the code above in your browser using DataLab