# \donttest{
library(omock)
library(CDMConnector)
# Creating CDM object
path <- downloadMockDataset(datasetName = "GiBleed",
path = NULL,
overwrite = NULL)
cdm <- mockCdmFromDataset(datasetName = "GiBleed")
# Create codelist_with_details from a codelist
codelist <- getDrugIngredientCodes(cdm,
name = "acetaminophen",
nameStyle = "{concept_name}",
type = "codelist")
asCodelistWithDetails(codelist, cdm)
# Create codelist from a candidate_codes
codelist <- getCandidateCodes(cdm,
keywords = "arthritis")
asCodelistWithDetails(codelist)
# }
Run the code above in your browser using DataLab