## ----eval=FALSE---------------------------------------------------------------
#  library(opalr)
#  o <- opal.login("administrator", "password", "https://opal-demo.obiba.org", profile = "default")

## ----eval=FALSE---------------------------------------------------------------
#  opal.assign.table(o, symbol = "df", value = "CNSIM.CNSIM1")

## ----eval=FALSE---------------------------------------------------------------
#  opal.assign.table.tibble(o, symbol = "tbl", value = "CNSIM.CNSIM1")

## ----eval=FALSE---------------------------------------------------------------
#  opal.assign.resource(o, symbol = "rsrc", value = "RSRC.CNSIM3")

## ----eval=FALSE---------------------------------------------------------------
#  opal.assign.script(o, symbol = "hello", value = quote(function(x) { paste0("Hello ", x, "!") }))

## ----eval=FALSE---------------------------------------------------------------
#  opal.symbols(o)

## ----eval=FALSE---------------------------------------------------------------
#  # column names
#  opal.execute(o, script = "names(tbl)")
#  # get variable description from column attributes
#  opal.execute(o, script = "attributes(tbl$GENDER)")
#  # coerce resource to a data.frame and plot histogram of one column
#  plot(opal.execute(o, script = "hist(as.data.frame(rsrc)$LAB_HDL)"))
#  # execute the custom function
#  opal.execute(o, script = "hello('friends')")

## ----eval=FALSE---------------------------------------------------------------
#  GENDER <- opal.execute(o, script = "tbl$GENDER")

## ----eval=FALSE---------------------------------------------------------------
#  opal.execute.source(o, path = "/path/to/some_code.R")

## ----eval=FALSE---------------------------------------------------------------
#  opal.file_write(o, source = "/projects/CNSIM/CNSIM3.zip", "test.zip")

## ----eval=FALSE---------------------------------------------------------------
#  opal.file_read(o, source = "test.zip", destination = "/tmp")

## ----eval=FALSE---------------------------------------------------------------
#  opal.workspace_save(o, save="demo")
#  opal.workspaces(o)

## ----eval=FALSE---------------------------------------------------------------
#  opal.logout(o)