## load a MRIaggr object
data("MRIaggr.Pat1_red", package = "MRIaggr")
## ROC analysis
res <- calcROCthreshold(MRIaggr.Pat1_red, param = c("DWI_t0","T2_FLAIR_t2"),
mask = c("MASK_DWI_t0","MASK_T2_FLAIR_t2"), numeric2logical = TRUE)
res <- calcROCthreshold(MRIaggr.Pat1_red, param = c("DWI_t0","T2_FLAIR_t2"),
mask = c("MASK_DWI_t0","MASK_T2_FLAIR_t2"), numeric2logical = TRUE,
plot = "boxplot_Youden",
update.object = TRUE, overwrite = TRUE)
selectDescStats(MRIaggr.Pat1_red, "Mask_threshold")
Run the code above in your browser using DataLab