Skip to contents

Teal Module: Patient Profile Basic Info Teal Module

Source: R/tm_t_pp_basic_info.R
tm_t_pp_basic_info.Rd

This teal module produces a patient profile basic info report using ADaM datasets.

Usage 

tm_t_pp_basic_info(
  label,
  dataname = "ADSL",
  patient_col = "USUBJID",
  vars = NULL,
  pre_output = NULL,
  post_output = NULL
)

Arguments

label

(character)
menu item label of the module in the teal app.

dataname

(character)
analysis data used in teal module.

patient_col

(character)
patient ID column to be used.

vars

(teal.transform::choices_selected() or teal.transform::data_extract_spec())
ADSL columns to be shown in Basic Info tab.

pre_output

optional, (shiny.tag)
with text placed before the output to put the output into context. For example a title.

post_output

optional, (shiny.tag)
with text placed after the output to put the output into context. For example the shiny::helpText() elements are useful.

Examples 

library(scda)
ADSL <- synthetic_cdisc_data("latest")$adsl

app <- init(
  data = cdisc_data(
    cdisc_dataset("ADSL", ADSL, code = 'ADSL <- synthetic_cdisc_data("latest")$adsl'),
    check = TRUE
  ),
  modules = modules(
    tm_t_pp_basic_info(
      label = "Basic info",
      dataname = "ADSL",
      patient_col = "USUBJID",
      vars = choices_selected(
        choices = variable_choices(ADSL),
        selected = c("ARM", "AGE", "SEX", "COUNTRY", "RACE", "EOSSTT")
      )
    )
  )
)
#> [INFO] 2022-10-14 09:11:00.4890 pid:3139 token:[] teal.modules.clinical Initializing tm_t_pp_basic_info
if (FALSE) {
shinyApp(app$ui, app$server)
}