#create IdMapDiffCounts object
IDs<-IdMapBase$primaryIDs(examples$msmsExperimentSet);
jointIdMap<-JointIdMap(examples$identDfList,primaryIDs=IDs);
diffs<-jointIdMap$getDiff("NetAffx_F","DAVID_Q",verbose=TRUE);
diffCounts<-IdMapDiffCounts(diffs);
# get summary
diffCounts$summary();
Run the code above in your browser using DataLab