# \donttest{
library(CodelistGenerator)
library(omock)
# Create a CDM object
cdm <- mockCdmReference()
# Load JSON files
x <- codesFromConceptSet(cdm = cdm,
path = system.file(package = "CodelistGenerator",
"concepts_for_mock"))
x
# Load JSON files as codelist_with_details
x <- codesFromConceptSet(cdm = cdm,
path = system.file(package = "CodelistGenerator",
"concepts_for_mock"),
type = "codelist_with_details")
x
# Load JSON files as concept_set_expression
x <- codesFromConceptSet(cdm = cdm,
path = system.file(package = "CodelistGenerator",
"concepts_for_mock"),
type = "concept_set_expression")
x
# }
Run the code above in your browser using DataLab