Skip to contents

[Stable]

Usage

cdisc_data_connector(connection, connectors)

Arguments

connection

(TealDataConnection)
connection to data source

connectors

(list of TealDatasetConnector elements)
list with dataset connectors

Value

CDISCTealDataConnector object

Examples

adsl_cf <- callable_function(
  function() as.data.frame(as.list(setNames(nm = get_cdisc_keys("ADSL"))))
)
adae_cf <- callable_function(
  function() as.data.frame(as.list(setNames(nm = get_cdisc_keys("ADAE"))))
)
adsl <- cdisc_dataset_connector(
  "ADSL", adsl_cf,
  keys = get_cdisc_keys("ADSL"), parent = character(0)
)
adae <- cdisc_dataset_connector(
  "ADAE", adae_cf,
  keys = get_cdisc_keys("ADAE"), parent = "ADSL"
)
data <- cdisc_data_connector(
  connection = data_connection(open_fun = callable_function(function() "open function")),
  connectors = list(adsl, adae)
)