## Not run:
# conn <- connectDatabase(user="usrname",password="passwd",dbname="compendium")
#
# GSMdescriptions(conn,"GSE18290")
# tab <- GSMdescriptions(conn,"GSE18290")
#
# # As an example just replace the current annotation by the same annotation
# updatePhenoData(conn,"GSE18290",tab)
# GSMdescriptions(conn,"GSE18290")
#
# ## End(Not run)
Run the code above in your browser using DataLab