# NOT RUN {
# Single cross-validation test with 25% test set
demsup_xvtest_25pct <- dcpo_xvt(demsup_data,
number_of_folds = 4,
iter = 300,
chains = 1) # 1 chain/300 iterations for example only; use defaults
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab