inst/line/make_mcmcdbwide.R

In jrnold/mcmcdb: MCMC sample database classes

# create line_mcmcwide data for the package
library(mcmcdb)
load("line_mcmc_list.Rdata")
line_samples <- McmcdbWide(line_mcmc_list)
model_code <- paste(readLines("line.jag"), collapse = "\n")
line_samples@metadata <-
  list(comment = "For use in the examples of package mcmcdb",
       model_code = model_code)
save(line_samples, file="../../data/line_samples.rda")