## Not run:
# conn <- connectDatabase(dbname="compendium")
#
# # Create ExpressionSet for the samples in GSE1657 corresponding to GPL96
# esets <- createESET(conn,"GSE1657","GPL96")
# # esets contains one component: "esetGSE1657_GPL96_SC"
#
# # Create ExpressionSet for the samples of both platforms present in GSE1657 (GPL96 &
# # GPL97), i.e, set GPLid to default value
# esets <- createESET(conn,"GSE1657") # Default GPLid=""
# # esets contains two components: "esetGSE1657_GPL96_SC" and "esetGSE1657_GPL97_SC"
# ## End(Not run)
Run the code above in your browser using DataLab