dataset03.RdThis is referred to in the book as the "FR" dataset. It consists of 100 cases, 67 of which are diseased, interpreted in two treatments, "0" = conventional film radiographs, "1" = digitized images viewed on monitors, by four radiologists using the ROC paradigm. Often referred to in the ROC literature as the Franken-dataset, which, along the the Van Dyke dataset, has been widely used to illustrate advances in ROC methodology.
dataset03A list with 3 elements: $ratings, $lesions and $descriptions; $ratings
contain 3 elements, $NL, $LL and $LL_IL as sub-lists; $lesions
contain 3 elements, $perCase, $IDs and $weights as sub-lists; $descriptions
contain 7 elements, $fileName, $type, $name,
$truthTableStr, $design, $modalityID and $readerID as sub-lists;
rating$NL num Array[1:2, 1:4, 1:100, 1] ratings of non-lesion localizations NLs
rating$LL num Array[1:2, 1:4, 1:67, 1] ratings of lesion localizations LLs
rating$LL_IL NA This placeholder is used only for LROC data
lesions$perCase int Array[1:67] number of lesions per diseased case
lesions$IDs num Array[1:67, 1] numeric labels of lesions on diseased cases
lesions$weights num Array[1:67, 1], weights (or clinical importance) of lesions
descriptions$fileName chr "dataset03" base name of dataset in `data` folder
descriptions$type chr "ROC", the data type
descriptions$name chr "FRANKEN", the name of the dataset
descriptions$truthTableStr num Array[1:2, 1:4, 1:100, 1:2] truth table structure
descriptions$design chr "FCTRL" study design factorial dataset
descriptions$modalityID chr Array[1:2] the modality labels
descriptions$readerID chr Array[1:4] the reader labels
Franken EA, et al. Evaluation of a Digital Workstation for Interpreting Neonatal Examinations: A Receiver Operating Characteristic Study. Investigative Radiology. 1992;27(9):732-737.
res <- str(dataset03)
#> List of 3
#> $ ratings :List of 3
#> ..$ NL : num [1:2, 1:4, 1:100, 1] 3 3 4 3 3 3 4 1 1 3 ...
#> ..$ LL : num [1:2, 1:4, 1:67, 1] 5 5 4 4 5 4 4 5 2 2 ...
#> ..$ LL_IL: logi NA
#> $ lesions :List of 3
#> ..$ perCase: num [1:67] 1 1 1 1 1 1 1 1 1 1 ...
#> ..$ IDs : num [1:67, 1] 1 1 1 1 1 1 1 1 1 1 ...
#> ..$ weights: num [1:67, 1] 1 1 1 1 1 1 1 1 1 1 ...
#> $ descriptions:List of 7
#> ..$ fileName : chr "dataset03"
#> ..$ type : chr "ROC"
#> ..$ name : chr "FRANKEN"
#> ..$ truthTableStr: num [1:2, 1:4, 1:100, 1:2] 1 1 1 1 1 1 1 1 1 1 ...
#> ..$ design : chr "FCTRL"
#> ..$ modalityID : Named chr [1:2] "TREAT1" "TREAT2"
#> .. ..- attr(*, "names")= chr [1:2] "TREAT1" "TREAT2"
#> ..$ readerID : Named chr [1:4] "READER_1" "READER_2" "READER_3" "READER_4"
#> .. ..- attr(*, "names")= chr [1:4] "READER_1" "READER_2" "READER_3" "READER_4"
## PlotEmpOpChr(dataset = dataset03, opChType = "ROC")$Plot