knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(vizdraws) vizdraws(prior = 'normal(0.05, 0.2)')
vizdraws(prior = 'normal(0.05, 0.2)', posterior = rnorm(n = 10000, mean = 0.3, sd = 0.5))
vizdraws(prior = rnorm(n = 10000, mean = 0, sd = 1), posterior = rnorm(n = 10000, mean = 0.3, sd = 0.5), xlim = c(-3,3), MME = 0.1)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.