# NOT RUN {
\dontrun{
# Create a fitted model object of class stanfitExtended inherited from stanfit.
fit <- fit_Bayesian_FROC( ite = 1111,
summary = FALSE,
cha = 1,
Null.Hypothesis = FALSE,
dataList = dd )
# Pairs plot to examine the divergent transition.
if (interactive()){grDevices::dev.new()}
pairs_plot_if_divergent_transition_occurred(fit)
if (interactive()){grDevices::dev.off()}
}
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab