In oxford-pharmacoepi/diagCovVaxExposures: A Package Skeleton for Cohort Diagnostics

knitr::opts_chunk$set(echo = FALSE, message = FALSE, warning = FALSE)

library(dplyr)
library(kableExtra)
load("cohort.summary.RDS")

for (i in 1:length(cohort.summary)) {
 cat("###", names(cohort.summary)[[i]], "\n")
    print(kable(cohort.summary[[i]], 
             col.names = c("Concept set", "Concept ID", "Concept name",
                           "Vocabulary", 
                           "Is excluded?",
                           "Include descendants?")) %>% 
 kable_styling(bootstrap_options = c("striped", "bordered")))

    cat('\n\n<!-- -->\n\n') 
   }

oxford-pharmacoepi/diagCovVaxExposures documentation built on Dec. 22, 2021, 5:21 a.m.