
Last chance! 50% off unlimited learning
Sale ends in
Thin 'echoice2'-vd draw objects
vd_thin_draw(est, burnin_perc = 0.5, total_draws = NULL)
thinned 'echoice2' draw object (list)
is an 'echoice2' draw object (list)
how much burn-in to remove
how many draws to keep after thinning
# \donttest{
data(icecream)
#run MCMC sampler (use way more than 50 draws for actual use)
icecream_est <- icecream %>% dplyr::filter(id<100) %>% vd_est_vdm(R=10, keep = 1, cores=2)
#without thinning, yields R=50 draWs
dim(icecream_est$MUDraw)
icecream_est_thinned <- vd_thin_draw(icecream_est,.5)
#26 draws left after thinning about half
dim(icecream_est_thinned$MUDraw)
# }
Run the code above in your browser using DataLab