Nothing
gf_dist("beta", shape1 = 19, shape2 = 3, xlim = c(0.4, 1)) %>%
gf_labs(title = "Beta(19, 3) posterior") %>%
gf_lims(y = c(0, 6))
gf_dist("beta", shape1 = 10, shape2 = 2, xlim = c(0.4, 1)) %>%
gf_labs(title = "Beta(10, 2) posterior") %>%
gf_lims(y = c(0, 6))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.