knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.path = "man/figures/README-", out.width = "35%" )
The goal of dagtex is to to create tikz DAGs from R. Under very early development and a bit of neglect.
You can install the development version of dagtex from GitHub with:
# install.packages("remotes") remotes::install_github("malcolmbarrett/dagtex")
This is a basic example which shows you how to solve a common problem:
library(dagtex) dagtex() %>% add_node("x") %>% add_node("y") %>% add_edge("x", "y", is_curved = TRUE) dagtex() %>% add_node("u1") %>% add_node("l") %>% add_node("a") %>% add_node("y") %>% add_node("u2", below = "u1") %>% add_node("u3", below = "l") %>% add_edge("u1", "l") %>% add_edge("l", "a") %>% add_edge("u1", "y", is_curved = TRUE, annotate = annotate_edge("wow")) %>% add_edge("l", "y", is_curved = TRUE) %>% add_edge("u2", "l", start_position = "north", end_position = "south") %>% add_edge("u2", "a", start_position = "north", end_position = "south") %>% add_edge("u3", "a", start_position = "north", end_position = "south") %>% add_edge("u3", "y", start_position = "north", end_position = "south")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.