expr <- gmExpr(root$project)
## Not run:
# gmConnectServer(MySQL(), ...)
# gmRead(expr$series)
#
# gmRead(expr$series[name=gmTitle, name=drop])
# ## naming the element gmTitle as name and dropping it in the result
#
# gmRead(expr[pID=id]$series[name=gmTitle, pID=group])
# ## grouping the series by their corresponding project in the result
# ## End(Not run)
Run the code above in your browser using DataLab