R/echoice2.R
vd_LL_vdmss.Rd
Log-Likelihood for volumetric demand model with set-size variation
vd_LL_vdmss(draw, vd, fromdraw = 1)
A list, 'echoice2' draws object
A tibble, tidy choice data (before dummy-coding)
An integer, from which draw onwards to compute LL (i.e., excl. burnin)
N x Draws Matrix of log-Likelihood values
data(icecream)
#fit model
#note: this is just for demo purposes
#on this demo dataset, the model is not identified
#due to a lack of set size variation
icecream_est <- icecream %>% vd_est_vdm_ss(R=10, keep=1, cores=2)
#> Using 2 cores
#> MCMC in progress
#> MCMC complete
#> Total Time Elapsed: 0.00 minutes
#compute likelihood for each subject in each draw
loglls<-vd_LL_vdmss(icecream_est, icecream, fromdraw = 2)
#300 respondents, 10 draws
dim(loglls)
#> [1] 300 10