BayesianFROC (version 0.2.1)

error_message_on_imaging_device_rhat_values: Error message on a plot plane(imaging device)

Description

Since, shiny board fix user interface, and it let me make this; in graphical device, the error message should be shown on its device. So, usual functions such as message() or cat() cannot use in Shiny board. Since, the UI is already made and it is graphical device!

If a fitted model converges, then the error message is none and thus only in R console, the message is printed such as "A model converged." and does not print error message on a plot plane.

Usage

error_message_on_imaging_device_rhat_values(StanS4class, digits = 3)

Arguments

StanS4class

An S4 object of class stanfitExtended which is an inherited class from the S4 class stanfit. This R object can be passed to the DrawCurves(), ppp() and ... etc

digits

digits to round r hat

Details

This is for non-convergent fitted model object, where convergence criteiron is R hat statistics for each model parameters.

Examples

# NOT RUN {
#========================================================================================
#   Non convergent fitting and error of it on graphic device
#========================================================================================
 
# }
# NOT RUN {
 # Creat a fitted model object which does not converge with R hat criterion:

 fit <- fit_Bayesian_FROC( ite  = 111,
                            cha = 1,
                        summary = T,
                Null.Hypothesis = F,
                       dataList = dd # Here, non convergent data
                         )


# Nothing is plotted:

plot(0,0,
     type ="n",
     axes =FALSE,
     ann=FALSE
     )


 # Error message on the above graphic device:

error_message_on_imaging_device_rhat_values(fit)

#========================================================================================
#      The author use in this packae as following manner:
#========================================================================================


        DrawCurves(fit)



# It does not work , and it is ,,, Ok since when non converges I will want to see
# plot, so this function is no need.

 # 2019 August 18
# }
# NOT RUN {
#donttest
# }