Basically i'm trying to set different sizes to specific relations in my DAG.
What i got so far was to put geom_dag_edges(edge_width =), but it resizes all the arrows.
the code for the plot:
status_colors <- c(exposure = "#0074D9", outcome = "#FF4136",latent = '#c2bcbc')
dag %>%
node_status() %>%
ggplot(aes(x = x, y = y, xend = xend, yend = yend)) +
geom_dag_edges() +
geom_dag_point(aes(colour = status)) +
scale_color_manual(breaks = c('outcome','exposure','latent'), values = status_colors) +
geom_dag_label_repel(aes(label = label), seed = 5,
color = "black", fontface = "bold",size=2.5) +
scale_fill_manual(values = status_colors, na.value = "white") +
theme_dag()