Open malcolmbarrett opened 1 month ago
library(ggdag, warn.conflicts = FALSE) coffee_cancer_dag <- dagify( cancer ~ smoking, smoking ~ addictive, coffee ~ addictive, exposure = "coffee", outcome = "cancer" ) ggdag_dconnected(coffee_cancer_dag, "coffee", "cancer")
dagitty::dconnected(coffee_cancer_dag, "coffee", "cancer") #> [1] TRUE
Created on 2024-08-13 with reprex v2.1.0
Created on 2024-08-13 with reprex v2.1.0