R/collapse-chains.R

In poissonconsulting/mcmcr: Manipulate MCMC Samples

Defines functions collapse_chains.mcmcr

Documented in collapse_chains.mcmcr

#' @export
universals::collapse_chains

#' @inherit universals::collapse_chains
#' @export
collapse_chains.mcmcr <- function(x, ...) {
  x <- lapply(x, collapse_chains)
  set_class(x, "mcmcr")
}