Introduction to hybridEHR

knitr::opts_chunk$set( collapse = TRUE, comment = “#>” )

library(hybridEHR)

ehr <- generate_hybrid_ehr_dataset( n_patients = 20, seed = 123, verbose = FALSE )

names(ehr$tables)

export_dir <- tempdir()

export_hybrid_ehr_dataset( dataset = ehr, output_dir = export_dir, verbose = FALSE )

list.files(export_dir)