data(yeast)
GO.groups.pruned = good.groups(colnames(yeast.hybrid),GO.groups,10)
dim(yeast.hybrid)
to_remove = setdiff(names(GO.groups),GO.groups.pruned)
yeast.hybrid.pruned = remove.from.genome(yeast.hybrid,GO.groups,to_remove)
dim(yeast.hybrid.pruned)
Run the code above in your browser using DataLab