# NOT RUN {
library(magrittr)
library(coda)
data(line, package = "coda")
# The `line` posterior has two chains with 200 iterations each:
line %>%
as_sample_tibble() %>%
summary()
# combine_chains combines the chains, giving 400 iterations with
# `.chain = NA` (to indicate that the chains were combined, as opposed to
# this being 400 iterations from one chain).
line %>%
as_sample_tibble() %>%
combine_chains() %>%
summary()
# }
Run the code above in your browser using DataLab