inst/doc/a02_ExploreCDMvocabulary.R

In CodelistGenerator: Identify Relevant Clinical Codes and Evaluate Their Use

## ----include = FALSE----------------------------------------------------------
NOT_CRAN <- identical(tolower(Sys.getenv("NOT_CRAN")), "true")
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  eval = NOT_CRAN
)

## ----include = FALSE----------------------------------------------------------
# CDMConnector::requireEunomia("synpuf-1k", "5.3")

## ----warning=FALSE, message=FALSE---------------------------------------------
# library(DBI)
# library(dplyr)
# library(CDMConnector)
# library(CodelistGenerator)
# 
# # Connect to the database and create the cdm object
# con <- dbConnect(duckdb::duckdb(),
#                  eunomiaDir("synpuf-1k", "5.3"))
# cdm <- cdmFromCon(con = con,
#                   cdmName = "Eunomia Synpuf",
#                   cdmSchema   = "main",
#                   writeSchema = "main",
#                   achillesSchema = "main")

## -----------------------------------------------------------------------------
# vocabularyVersion(cdm)

## -----------------------------------------------------------------------------
# availableVocabularies(cdm)

## -----------------------------------------------------------------------------
# availableDomains(cdm)

## -----------------------------------------------------------------------------
# availableDomains(cdm,
#                  standardConcept = "Standard")

## -----------------------------------------------------------------------------
# availableConceptClassIds(cdm)

## -----------------------------------------------------------------------------
# availableConceptClassIds(cdm,
#                          standardConcept = "Non-standard",
#                          domain = "Condition")

## -----------------------------------------------------------------------------
# availableRelationshipIds(cdm)

## -----------------------------------------------------------------------------
# availableRelationshipIds(cdm,
#                          standardConcept1 = "Standard",
#                          standardConcept2 = "Standard",
#                          domains1 = "Observation",
#                          domains2 = "Observation")