# \donttest{
library(DrugUtilisation)
cdm <- mockDrugUtilisation()
conceptlist <- list("a" = 1125360, "b" = c(1503297, 1503327))
cdm <- generateDrugUtilisationCohortSet(
cdm = cdm,
name = "switch_cohort",
conceptSet = conceptlist
)
cdm$cohort1 |>
addDrugRestart(switchCohortTable = "switch_cohort")
CDMConnector::cdmDisconnect(cdm = cdm)
# }
Run the code above in your browser using DataLab