Edges for paths activated by stratification on colliders
Adjusting for a collider activates pathways between the parent of the collider. This geom adds a curved edge between any such parent nodes.
geom_dag_collider_edges( mapping = NULL, data = NULL, stat = "identity", position = "identity", ..., size = 0.6, curvature = 0.5, angle = 90, ncp = 5, arrow = NULL, lineend = "butt", na.rm = FALSE, show.legend = NA, inherit.aes = TRUE )
mapping |
Set of aesthetic mappings created by |
data |
The data to be displayed in this layer. There are three options: If A A |
stat |
The statistical transformation to use on the data for this layer, as a string. |
position |
Position adjustment, either as a string, or the result of a call to a position adjustment function. |
... |
Other arguments passed on to |
size |
a numeric vector of length 1. Edge width |
curvature |
A numeric value giving the amount of curvature. Negative values produce left-hand curves, positive values produce right-hand curves, and zero produces a straight line. |
angle |
A numeric value between 0 and 180, giving an amount to skew the control points of the curve. Values less than 90 skew the curve towards the start point and values greater than 90 skew the curve towards the end point. |
ncp |
The number of control points used to draw the curve. More control points creates a smoother curve. |
arrow |
specification for arrow heads, as created by arrow(). |
lineend |
Line end style (round, butt, square). |
na.rm |
If |
show.legend |
logical. Should this layer be included in the legends?
|
inherit.aes |
If |
library(dagitty) dagify(m ~ a + b, x ~ a, y ~ b) %>% tidy_dagitty() %>% control_for("m") %>% ggplot(aes(x = x, y = y, xend = xend, yend = yend, shape = adjusted)) + geom_dag_edges() + geom_dag_collider_edges() + geom_dag_point() + geom_dag_text() + theme_dag() + scale_adjusted()
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.