ccPred(filedir, q.partial = T, q.trace = F, quiet = T)
## Note this is a very short MCMC run! ## For good analysis need proper burn-in period. data(ybar,ss) outdir <- BGmix(ybar, ss, c(8,8), nburn=0, niter=100, nthin=1) pred <- ccPred(outdir)
Run the code above in your browser using DataLab