`r params$title`"

knitr::opts_chunk$set(echo = TRUE)
library(gt)

Result overview

summary(result)
omopgenerics::settings(result)

Index event breakdown

if(any("cohort_code_use" == omopgenerics::settings(result) |> 
   dplyr::pull("result_type")) == TRUE){
CodelistGenerator::tableCohortCodeUse(result = result)
}

Cohort overlap

if(any("cohort_overlap" == omopgenerics::settings(result) |> 
   dplyr::pull("result_type")) == TRUE){
CohortCharacteristics::plotCohortOverlap(result)
}
if(any("cohort_timing" == omopgenerics::settings(result) |> 
   dplyr::pull("result_type")) == TRUE){
CohortCharacteristics::plotCohortTiming(result)
}

Demographics

CohortCharacteristics::tableCharacteristics(result)


Try the PhenotypeR package in your browser

Any scripts or data that you put into this service are public.

PhenotypeR documentation built on April 3, 2025, 10:46 p.m.