if (FALSE) {
con <- dbConnect(DSOpal::Opal(),
"administrator", "password", "https://opal-demo.obiba.org")
dsAssignTable(con, "D", "test.CNSIM")
dsAggregate(con, as.symbol("meanDS(D$WEIGHT)"))
dsDisconnect(con)
}
Run the code above in your browser using DataLab