R/tidy.R

In mcmcr: Manipulate MCMC Samples

#' @export
generics::tidy

#' @inheritParams nlist::tidy.mcmc.list
#' @inheritParams params
#'
#' @export
tidy.mcmcr <- function(
  x,
  simplify = TRUE,
  directional_information = FALSE,
  ...
) {
  chk_unused(...)
  if (missing(directional_information)) {
    warn_default_directional_information("tidy")
  }
  tidy(
    as_mcmc_list(x),
    simplify = simplify,
    directional_information = directional_information
  )
}