Goals:
plan <- read_simplan(file = 'inst/test_seq.yml')
print_file <- "test2.R"
translate_to_rscript(plan, print_file)
# Run the script
plot_nodes_raw_base(plan = plan, facet = FALSE)
library(simplan)
plan <- read_simplan('inst/test_seq.yml')
plan <- bake_plan(plan)
plan <- add_node(
plan = plan,
name = "zambda",
type = "SIMPLE",
distribution = "normal",
parameters = list(mean = 0, sd = 1),
sequence_parameters = NULL,
contortion = NULL,
initials = NULL
)
plan <- bake_plan(plan)
plan <- unbake_plan(plan)
plan <- bake_plan(plan)
plan <- read_simplan(file = 'inst/test_seq.yml')
plan <- bake_plan(plan)
plot_simulation_DAG(plan)
plan_viz <- visualise_node_network(plan)
visNetwork::visHierarchicalLayout(
plan_viz,
sortMethod = "directed",
direction = "LR")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.