Skip to contents

Load TealDatasetConnector object from a file

dataset_connector_file.Rd

[Stable]

[Stable]

Usage 

dataset_connector_file(path)

cdisc_dataset_connector_file(path)

Arguments

path

(character) string giving the pathname of the file to read from.

Value

TealDatasetConnector object

CDISCTealDatasetConnector object

Details

Please note that the script has to end with a call creating desired object. The error will be raised otherwise.

Please note that the script has to end with a call creating desired object. The error will be raised otherwise.

Examples 

# simple example
library(magrittr)
file_example <- tempfile(fileext = ".R")
writeLines(
  text = c(
    "library(teal.data)

     pull_callable <- callable_function(teal.data::example_cdisc_data) %>%
       set_args(list(dataname = \"ADSL\"))
     dataset_connector(\"ADSL\", pull_callable, get_cdisc_keys(\"ADSL\"))"
  ),
  con = file_example
)
x <- dataset_connector_file(file_example)
get_code(x)
#> [1] "ADSL <- teal.data::example_cdisc_data(dataname = \"ADSL\")"
# simple example
library(magrittr)
file_example <- tempfile(fileext = ".R")
writeLines(
  text = c(
    "library(teal.data)

     pull_callable <- callable_function(teal.data::example_cdisc_data) %>%
       set_args(list(dataname = \"ADSL\"))
     cdisc_dataset_connector(\"ADSL\", pull_callable, get_cdisc_keys(\"ADSL\"))"
  ),
  con = file_example
)
x <- cdisc_dataset_connector_file(file_example)
get_code(x)
#> [1] "ADSL <- teal.data::example_cdisc_data(dataname = \"ADSL\")"