# \donttest{
library(DrugUtilisation)
library(CodelistGenerator)
cdm <- mockDrugUtilisation()
druglist <- getDrugIngredientCodes(cdm = cdm,
name = c("acetaminophen", "metformin"))
cdm <- generateDrugUtilisationCohortSet(cdm = cdm,
name = "drug_cohorts",
conceptSet = druglist,
gapEra = 100)
cohortGapEra(cdm$drug_cohorts)
# }
Run the code above in your browser using DataLab