## Not run:
# ## find assay ID's related to yeast
# aids <- find.assay.id('yeast')
#
# ## get the description of the first 10 assays
# descs <- lapply( lapply(as.list(aids[1:10]), get.assay.desc), function(x)
# x$assay.desc )
# ## End(Not run)
Run the code above in your browser using DataLab