dataset06.RdThis is referred to in the book as the "MAG" dataset (after Magnus Bath, who conducted the JAFROC analysis). It consists of 100 cases, 69 of which are diseased, interpreted in two treatments ("1" = conventional chest, "1" = chest tomosynthesis) by four radiologists using the FROC paradigm.
dataset06A 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:89, 1:17] ratings of non-lesion localizations NLs
rating$LL num Array[1:2, 1:4, 1:42, 1:15] ratings of lesion localizations LLs
rating$LL_IL NA This placeholder is used only for LROC data
lesions$perCase int Array[1:42], number of lesions per diseased case
lesions$IDs num Array[1:42, 1:15], numeric labels of lesions on diseased cases
lesions$weights num Array[1:42, 1:15], weights (or clinical importance) of lesions
descriptions$fileName chr "dataset06", base name of dataset in `data` folder
descriptions$type chr "FROC" the data type
descriptions$name chr "MAGNUS", the name of the dataset
descriptions$truthTableStr num Array[1:2, 1:4, 1:89, 1:16] truth table structure
descriptions$design chr "FCTRL", study design factorial dataset
descriptions$modalityID chr Array[1:2] "1" "2", modality labels
descriptions$readerID chr Array[1:4] "1" "2" "3" "4", reader labels
Vikgren J et al. Comparison of Chest Tomosynthesis and Chest Radiography for Detection of Pulmonary Nodules: Human Observer Study of Clinical Cases. Radiology. 2008;249(3):1034-1041.
res <- str(dataset06)
#> List of 3
#> $ ratings :List of 3
#> ..$ NL : num [1:2, 1:4, 1:89, 1:17] 1 -Inf -Inf -Inf 1 ...
#> ..$ LL : num [1:2, 1:4, 1:42, 1:15] -Inf -Inf -Inf -Inf -Inf ...
#> ..$ LL_IL: logi NA
#> $ lesions :List of 3
#> ..$ perCase: int [1:42] 1 1 2 1 3 1 1 8 10 2 ...
#> ..$ IDs : num [1:42, 1:15] 1 1 1 1 1 1 1 1 1 1 ...
#> ..$ weights: num [1:42, 1:15] 1 1 0.5 1 0.333 ...
#> $ descriptions:List of 7
#> ..$ fileName : chr "dataset06"
#> ..$ type : chr "FROC"
#> ..$ name : chr "MAGNUS"
#> ..$ truthTableStr: num [1:2, 1:4, 1:89, 1:16] 1 1 1 1 1 1 1 1 1 1 ...
#> ..$ design : chr "FCTRL"
#> ..$ modalityID : Named chr [1:2] "1" "2"
#> .. ..- attr(*, "names")= chr [1:2] "1" "2"
#> ..$ readerID : Named chr [1:4] "1" "2" "3" "4"
#> .. ..- attr(*, "names")= chr [1:4] "1" "2" "3" "4"
## PlotEmpOpChr(dataset = dataset06, opChType = "wAFROC")$Plot