This adds a unique product identifier to demand draw objects.
vd_add_prodid(de)
demand draws
est
data(icecream)
#run MCMC sampler (use way more than 10 draws for actual use)
icecream_est <- icecream %>% dplyr::filter(id<50) %>% vd_est_vdm(R=10, keep=1)
#> Using 16 cores
#> MCMC in progress
#> MCMC complete
#> Total Time Elapsed: 0.00 minutes
#Generate demand predictions
icecream_predicted_demand=
icecream %>% dplyr::filter(id<50) %>%
vd_dem_vdm(icecream_est)
#> Using 16 cores
#add prodid
icecream_predicted_demand_w_id<-icecream_predicted_demand %>% vd_add_prodid