在tidyverse环境中使用ggdag可以轻松地使用dagitty。您可以直接整理dagitty对象，或使用方便的函数使用更接近R语言风格的语法创建DAGs。



安装

install.packages("ggdag")



代码

library(dagitty)
library(ggdag)
library(ggplot2)

dag <- dagitty("dag{y <- z -> x}")
tidy_dagitty(dag)



ggdag(dag, layout = "circle")



library(ggdag)
library(ggplot2)

#  example from the dagitty package
dag <- dagitty::dagitty("dag {
    y <- x <- z1 <- v -> z2 -> y
    z1 <- w1 <-> w2 -> z2
    x <- w1 -> y
    x <- w2 -> y
    x [exposure]
    y [outcome]
  }")

tidy_dag <- tidy_dagitty(dag)
ggdag(tidy_dag) +
  theme_dag()



广而告之