## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
## ----setup--------------------------------------------------------------------
library(DFBA)
## -----------------------------------------------------------------------------
dfba_beta_descriptive(a = 17,
b = 3)
## ----fig.retina=12, fig.width = 7---------------------------------------------
plot(dfba_beta_descriptive(a = 17,
b = 3))
## -----------------------------------------------------------------------------
x<- dfba_beta_descriptive(a = 17,
b = 3)$outputdf
head(x)
## -----------------------------------------------------------------------------
x <- dfba_beta_descriptive(a = 31,
b = 20,
prob_interval = .90)
hdi <- c(x$hdi_lower,
x$hdi_upper)
hdi
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.