Covariate Adjustment Sets — Covariate Adjustment Sets • ggdag

See dagitty::adjustmentSets() for details.

Usage

dag_adjustment_sets(.tdy_dag, exposure = NULL, outcome = NULL, ...)

ggdag_adjustment_set(
  .tdy_dag,
  exposure = NULL,
  outcome = NULL,
  ...,
  shadow = TRUE,
  size = 1,
  node_size = 16,
  text_size = 3.88,
  label_size = text_size,
  text_col = "white",
  label_col = "black",
  edge_width = 0.6,
  edge_cap = 10,
  arrow_length = 5,
  use_edges = TRUE,
  use_nodes = TRUE,
  use_stylized = FALSE,
  use_text = TRUE,
  use_labels = FALSE,
  label = NULL,
  text = NULL,
  node = deprecated(),
  stylized = deprecated(),
  expand_x = expansion(c(0.25, 0.25)),
  expand_y = expansion(c(0.2, 0.2))
)

Arguments

.tdy_dag: input graph, an object of class tidy_dagitty or dagitty
exposure: a character vector, the exposure variable. Default is NULL, in which case it will be determined from the DAG.
outcome: a character vector, the outcome variable. Default is NULL, in which case it will be determined from the DAG.
...: additional arguments to adjustmentSets
shadow: logical. Show paths blocked by adjustment?
size: A numeric value scaling the size of all elements in the DAG. This allows you to change the scale of the DAG without changing the proportions.
node_size: The size of the nodes.
text_size: The size of the text.
label_size: The size of the labels.
text_col: The color of the text.
label_col: The color of the labels.
edge_width: The width of the edges.
edge_cap: The size of edge caps (the distance between the arrowheads and the node borders).
arrow_length: The length of arrows on edges.
use_edges: A logical value. Include a geom_dag_edges*() function? If TRUE, which is determined by edge_type.
use_nodes: A logical value. Include geom_dag_point()?
use_stylized: A logical value. Include geom_dag_node()?
use_text: A logical value. Include geom_dag_text()?
use_labels: A logical value. Include geom_dag_label_repel()?
label: The bare name of a column to use for geom_dag_label_repel(). If use_labels = TRUE, the default is to use label.
text: The bare name of a column to use for geom_dag_text(). If use_text = TRUE, the default is to use name.
node: Deprecated.
stylized: Deprecated.
expand_x, expand_y: Vector of range expansion constants used to add some padding around the data, to ensure that they are placed some distance away from the axes. Use the convenience function ggplot2::expansion() to generate the values for the expand argument.

Value

a tidy_dagitty with an adjusted column and set column, indicating adjustment status and DAG ID, respectively, for the adjustment sets or a ggplot

Examples

dag <- dagify(
  y ~ x + z2 + w2 + w1,
  x ~ z1 + w1,
  z1 ~ w1 + v,
  z2 ~ w2 + v,
  w1 ~ ~w2,
  exposure = "x",
  outcome = "y"
)

tidy_dagitty(dag) %>% dag_adjustment_sets()
#> # A DAG with 7 nodes and 33 edges
#> #
#> # Exposure: x
#> # Outcome: y
#> #
#> # A tibble: 36 × 10
#>    name        x      y direction to      xend   yend circular adjusted   set   
#>    <chr>   <dbl>  <dbl> <fct>     <chr>  <dbl>  <dbl> <lgl>    <chr>      <chr> 
#>  1 v     -0.0993 -1.12  ->        z1    -0.938 -2.26  FALSE    unadjusted {w1, …
#>  2 v     -0.0993 -1.12  ->        z2    -1.20  -0.305 FALSE    unadjusted {w1, …
#>  3 w1    -2.34   -1.88  ->        x     -1.93  -2.66  FALSE    adjusted   {w1, …
#>  4 w1    -2.34   -1.88  ->        y     -1.98  -1.23  FALSE    adjusted   {w1, …
#>  5 w1    -2.34   -1.88  ->        z1    -0.938 -2.26  FALSE    adjusted   {w1, …
#>  6 w1    -2.34   -1.88  <->       w2    -2.47  -0.486 FALSE    adjusted   {w1, …
#>  7 w2    -2.47   -0.486 ->        y     -1.98  -1.23  FALSE    adjusted   {w1, …
#>  8 w2    -2.47   -0.486 ->        z2    -1.20  -0.305 FALSE    adjusted   {w1, …
#>  9 x     -1.93   -2.66  ->        y     -1.98  -1.23  FALSE    unadjusted {w1, …
#> 10 y     -1.98   -1.23  NA        NA    NA     NA     FALSE    unadjusted {w1, …
#> # ℹ 26 more rows

ggdag_adjustment_set(dag)


ggdag_adjustment_set(
  dagitty::randomDAG(10, .5),
  exposure = "x3",
  outcome = "x5"
)