r names(ext_draws)[[{{i}}]]
library(ggplot2) library(prvm) p <- mc_plot(as.numeric(ext_draws[[{{i}}]]),name= names(ext_draws)[[{{i}}]]) print(p)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.