# NOT RUN {
## Compute the posterior distribution of \eqn{\theta}.
library(bacistool)
bacisPlotClassification(numGroup=5,
tau1=NA,
tau2=.001,
phi1=0.1, phi2=0.3,
clusterCutoff=NA,
MCNum=5000,
nDat=c(25,25,25,25,25),
xDat=c(3,4,3,8,7),
cols = c("brown", "red", "orange", "blue", "green")
)
# }
Run the code above in your browser using DataLab