# Causal map with default parameters
causal_net(L_heur_1)
# Causal map with lower dependency treshold
causal_net(L_heur_1, threshold = .8)
# For even more control omit the `eventlog` parameter
# and provide `dependencies` and `bindings` directly.
d <- dependency_matrix(L_heur_1, threshold = .8)
causal_net(dependencies = d,
bindings = causal_bindings(L_heur_1, d, "nearest"))
# The returned DiagrammeR object can be further augmented with
# panning and zooming before rendering:
# \donttest{
library(magrittr)
causal_net(L_heur_1) %>%
render_causal_net(render = TRUE) %>%
DiagrammeRsvg::export_svg() %>%
svgPanZoom::svgPanZoom()
# }
Run the code above in your browser using DataLab