# NOT RUN {
# }
# NOT RUN {
#1) Build the S4 class object by the following:
fit <- fit_Bayesian_FROC(dataList.Chakra.Web)
# The object "fit" is an S4 class object
# whose S4 class name is stanfit in the rstan package.
#<<Minor comments>>
#Note that return value "fit" is not an stanfit S4 object generated by rstan::stan(),
#but some inherited S4 class object which is an S4 object of
# some inherited S4 class from stanfit class. So, we can consider it as an object of
#an S4 class of rstan::stan().
#2) Now, we obtain the S4 class object named "fit".
# Using this S4 class object, we draw the curves by:
DrawCurves_MRMC_pairwise(fit,
modality = 1,
reader = 4
)
#3) By changing the modality (or reader),
#we can draw the curves with respect to different modalities.
#This shows the comparison of modalites.
DrawCurves_MRMC_pairwise(fit,
modality = 2,
reader = 4
)
DrawCurves_MRMC_pairwise(fit,
modality = 3,
reader = 4
)
#4) By repeating in this manner for different modalities or readers,
# we can draw AFROC (FROC) curves in a single imaging device.
# Revised 2019 Nov 27
#5) If you want to draw the FROC curves
#for reader ID =1,2,3,4 and modality ID =1,2, then the code is as follows;
DrawCurves_MRMC_pairwise(
fit,
modalityID = c(1,2,3,4),
readerID = c(1,2)
)
# Each color of curves corresponds to the modality ID.
# So, even if curves are different readers and same modality, then color is same.
# Close the graphic device
Close_all_graphic_devices()
# }
# NOT RUN {
# dottest
# }
Run the code above in your browser using DataLab