# NOT RUN {
# }
# NOT RUN {
#----------------------------------------------------------------------------------------
# 1) Fit a Model to MRMC Data
#----------------------------------------------------------------------------------------
fit <- fit_Bayesian_FROC( ite = 1111, dataList = ddd )
#----------------------------------------------------------------------------------------
# 1) Evaluate Posterior Predictive P value for the Goodness of Fit
#----------------------------------------------------------------------------------------
ppp_MRMC(fit)
# If this quantity is greater, then we may say that our model is better.
# I made this ppp at 2019 August 25. Tinko Tinko Tinko oppai ga ippai!! hentai banzai!
# }
# NOT RUN {
#'
# }
Run the code above in your browser using DataLab