Server part of get R code module

Usage

get_rcode_srv(
  id,
  datasets,
  datanames = datasets$datanames(),
  modal_title = "R Code",
  code_header = "Automatically generated R code",
  disable_buttons = reactiveVal(FALSE)
)

Arguments

id

An ID string that corresponds with the ID used to call the module's UI function.

datasets

(list) list of FilteredData available inside the server function of any teal module.

datanames

(character)
names of datasets which code should be returned for. Due to fact that teal filter panel depending on "ADSL", code for ADSL is always returned even if not specified.

modal_title

optional, (character) title of the modal

code_header

optional, (character) header inside R

disable_buttons

optional, (reactive) a shiny reactive value. Should be a single boolean value, indicating whether to disable or enable the show R code and Debug info buttons. Default: reactiveVal(FALSE).