#' as.data.frame.Bolstad
#' @param x an object of class \code{Bolstad}
#' @param \dots, any extra arguments needed.
#' @import stats
#' @import graphics
#' @export
as.data.frame.Bolstad = function(x, ...){
result = data.frame(param.x = x$param.x, prior = x$prior, likelihood = x$likelihood,
posterior = x$posterior, ...)
names(result)[1] = x$name
return(result)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.