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     2.18   0.0732 ->        z1     0.946 -0.595 FALSE    unadjusted {w1, w…
#>  2 v     2.18   0.0732 ->        z2     2.83  -1.13  FALSE    unadjusted {w1, w…
#>  3 w1    1.10  -2.04   ->        x      0.387 -1.51  FALSE    adjusted   {w1, w…
#>  4 w1    1.10  -2.04   ->        y      1.79  -1.76  FALSE    adjusted   {w1, w…
#>  5 w1    1.10  -2.04   ->        z1     0.946 -0.595 FALSE    adjusted   {w1, w…
#>  6 w1    1.10  -2.04   <->       w2     2.46  -2.36  FALSE    adjusted   {w1, w…
#>  7 w2    2.46  -2.36   ->        y      1.79  -1.76  FALSE    adjusted   {w1, w…
#>  8 w2    2.46  -2.36   ->        z2     2.83  -1.13  FALSE    adjusted   {w1, w…
#>  9 x     0.387 -1.51   ->        y      1.79  -1.76  FALSE    unadjusted {w1, w…
#> 10 y     1.79  -1.76   NA        NA    NA     NA     FALSE    unadjusted {w1, w…
#> # ℹ 26 more rows

ggdag_adjustment_set(dag)


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