# NOT RUN {
# }
# NOT RUN {
#========================================================================================
# 1) Fit a Model to MRMC Data
#========================================================================================
fit <- fit_Bayesian_FROC( ite = 33, 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.
Close_all_graphic_devices() # 2020 August
# }
# NOT RUN {
#'
# }
Run the code above in your browser using DataLab