library(scenarios)
tree1 <- nst.p_inventory(c(5, 3, 2), 4, 0.6, 0.8)
plot(tree1)
tree2 <- nst.p_inventory(c(10, 5, 5), 4, 0.6, 0.8)
plot(tree2)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.