# \donttest{
library(omock)
library(CDMConnector)
# Creating CDM object
cdm <- mockCdmFromDataset(datasetName = "GiBleed")
# Create concept_set_expression from a codelist
codelist <- getDrugIngredientCodes(cdm,
name = "acetaminophen",
nameStyle = "{concept_name}",
type = "codelist")
asConceptSetExpression(codelist)
# Create concept_set_expression from a codelist_with_details
codelist <- getDrugIngredientCodes(cdm,
name = "acetaminophen",
nameStyle = "{concept_name}",
type = "codelist_with_details")
asConceptSetExpression(codelist)
# }
Run the code above in your browser using DataLab