fix dagitty

tlverse · Sep 21, 2024 · 2931693 · 2931693
1 parent be882d9
commit 2931693
Show file tree

Hide file tree

Showing 2 changed files with 233 additions and 82 deletions.
diff --git a/04-roadmap.Rmd b/04-roadmap.Rmd
@@ -417,16 +417,15 @@ library(dagitty)
 library(ggdag)
 
 # make DAG by specifying dependence structure
-dag <- dagitty(
-  "dag {
-    W -> A
-    W -> Y
-    A -> Y
-    W -> A -> Y
-  }"
-)
-exposures(dag) <- c("A")
-outcomes(dag) <- c("Y")
+dag <- dagitty("dag{
+    W -> A ;
+    W -> Y ;
+    A -> Y ;
+    W -> A -> Y ;
+    W [confounders]
+    A [exposure]
+    Y [outcome]
+  }")
 tidy_dag <- tidy_dagitty(dag)
 
 # visualize DAG