obj1<-IdMapBase(examples$identDfList[[1]]);
obj2<-IdMapBase(examples$identDfList[[2]]);
aligned(obj1,obj2);
obj3<-IdMapBase(obj1[1:10,]);
DF<-cbind(obj1[1:10,1],obj2[1:10,2]);
colnames(DF)<-colnames(obj3);
obj4<-IdMapBase(DF);
aligned(obj3,obj4);
Run the code above in your browser using DataLab