Skip to contents

Create a visual table from a summariseClinicalRecord() output.

Usage

tableClinicalRecords(result, type = "gt")

Arguments

result

Output from summariseClinicalRecords().

type

Type of formatting output table. See visOmopResults::tableType() for allowed options.

Value

A formatted table object with the summarised data.

Examples

# \donttest{
cdm <- mockOmopSketch()

summarisedResult <- summariseClinicalRecords(
  cdm = cdm,
  omopTableName = c("condition_occurrence", "drug_exposure"),
  recordsPerPerson = c("mean", "sd"),
  inObservation = TRUE,
  standardConcept = TRUE,
  sourceVocabulary = TRUE,
  domainId = TRUE,
  typeConcept = TRUE
)
#>  Adding variables of interest to condition_occurrence.
#>  Summarising records per person in condition_occurrence.
#>  Summarising condition_occurrence: `in_observation`, `standard_concept`,
#>   `source_vocabulary`, `domain_id`, and `type_concept`.
#>  Adding variables of interest to drug_exposure.
#>  Summarising records per person in drug_exposure.
#>  Summarising drug_exposure: `in_observation`, `standard_concept`,
#>   `source_vocabulary`, `domain_id`, and `type_concept`.

summarisedResult |>
  suppress(minCellCount = 5) |>
  tableClinicalRecords()
Variable name Variable level Estimate name
Database name
mockOmopSketch
condition_occurrence
Number records - N 8,400
Number subjects - N (%) 100 (100.00%)
Records per person - Mean (SD) 84.00 (8.73)
In observation Yes N (%) 8,400 (100.00%)
Domain Condition N (%) 8,400 (100.00%)
Source vocabulary No matching concept N (%) 8,400 (100.00%)
Standard concept S N (%) 8,400 (100.00%)
Type concept id Unknown type concept: 1 N (%) 8,400 (100.00%)
drug_exposure
Number records - N 21,600
Number subjects - N (%) 100 (100.00%)
Records per person - Mean (SD) 216.00 (14.17)
In observation Yes N (%) 21,600 (100.00%)
Domain Drug N (%) 21,600 (100.00%)
Source vocabulary No matching concept N (%) 21,600 (100.00%)
Standard concept S N (%) 21,600 (100.00%)
Type concept id Unknown type concept: 1 N (%) 21,600 (100.00%)
PatientProfiles::mockDisconnect(cdm) # }