commonSamples<-intersect(colnames(examples$msmsExperimentSet),
colnames(examples$msmsExperimentSet));
mrna.subset<-Subset$byColNames(examples$mrnaExperimentSet,
commonSamples,orderBySubset=TRUE);
mrna.subset[1:10,1:5];
Run the code above in your browser using DataLab