## Not run:
# data(yeast)
# GO.groups.pruned = good.groups(colnames(yeast.homozygote),GO.groups,30)
# test_groups = GO.groups[GO.groups.pruned[1:100]]
# yeast.test = test.groups(yeast.tree,yeast.homozygote,test_groups,print_names=T)
# plot_wAICbarplot(mytest$wAIC,1:7)
# ## End(Not run)
Run the code above in your browser using DataLab