# \donttest{
cdm <- mockVocabRef("database")
codes <- getCandidateCodes(cdm = cdm,
keywords = "arthritis",
domains = "Condition",
includeDescendants = FALSE)
x <- subsetToCodesInUse(list("cs1" = codes$concept_id,
"cs2" = 999),
cdm = cdm)
x
CDMConnector::cdmDisconnect(cdm)
# }
Run the code above in your browser using DataLab