# NOT RUN {
f <- gjamSimData(n = 200, S = 10, Q = 3, typeNames = 'CA')
ml <- list(ng = 2000, burnin = 50, typeNames = f$typeNames, holdoutN = 10)
output <- gjam(f$formula, f$xdata, f$ydata, modelList = ml)
# condition on three species
gjamConditionalParameters( output, conditionOn = c('S1','S2','S3') )
# }
Run the code above in your browser using DataLab