print_concept_siblings: Print a Concept's Parents and Siblings to the Console

Description Usage Arguments See Also Examples

View source: R/x_print_concept_siblings.R

Description

Print all of a concept's parents and siblings.

Usage

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
print_concept_siblings(
  concept_obj,
  level_of_separation_type = c("max", "min"),
  write_schema = "patelm9",
  vocab_schema = "omop_vocabulary",
  conn,
  conn_fun = "connectAthena()",
  cache_only = FALSE,
  skip_cache = FALSE,
  override_cache = FALSE,
  verbose = TRUE,
  render_sql = TRUE,
  render_only = FALSE
)

Arguments

concept_obj

Concept class object or a concept id.

See Also

parse_expr character(0) tibble filter,select split_deselect map

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
library(chariot)
library(tidyverse)

conn <- connectAthena()
# Drug Domain
concept_obj <- get_concept(conn = conn,
                           concept_id = 1308216)
concept_obj
print_concept_siblings(conn = conn,
                        concept_obj = concept_obj)
print_concept_siblings(conn = conn,
                        concept_obj = concept_obj,
                        level_of_separation_type = "min")


# Cancer Condition Domain
concept_obj <- get_concept(conn = conn,
                           concept_id = 4187868)
concept_obj
print_concept_siblings(conn = conn,
                        concept_obj = concept_obj)
print_concept_siblings(conn = conn,
                        concept_obj = concept_obj,
                        level_of_separation_type = "min")

# Chronic Disease Domain
concept_obj <- get_concept(conn = conn,
                           concept_id = 319835)
concept_obj
print_concept_siblings(conn = conn,
                        concept_obj = concept_obj)
print_concept_siblings(conn = conn,
                        concept_obj = concept_obj,
                        level_of_separation_type = "min")

# Measurement Domain
concept_obj <- get_concept(conn = conn, concept_id = 4298431)
concept_obj
print_concept_siblings(conn = conn,
                        concept_obj = concept_obj)
print_concept_siblings(conn = conn,
                        concept_obj = concept_obj,
                        level_of_separation_type = "min")

dcAthena(conn = conn)

patelm9/chariot documentation built on Feb. 19, 2022, 11:29 a.m.