if (FALSE) {
library(opalr)
opal <-
opal.login('administrator','password',
url ='https://opal-demo.obiba.org/')
# use madshapR_DEMO provided by the package
library(madshapR)
library(stringr)
dataset <- madshapR_DEMO$dataset_MELBOURNE
tempdir <- basename(tempdir())
try(opal_project_create(opal, tempdir))
# push a table in a project.
try(
opal_tables_push(
opal,
dataset = dataset,
table_name = 'MELBOURNE',
project_name = tempdir,
.force = TRUE,
.overwrite = TRUE))
}
Run the code above in your browser using DataLab