This 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.

dataset06

Format

A 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 [1:2, 1:4, 1:89, 1:17], ratings of non-lesion localizations, NLs

  • rating$LL, num [1:2, 1:4, 1:42, 1:15], ratings of lesion localizations, LLs

  • rating$LL_ILNA, this placeholder is used only for LROC data

  • lesions$perCase, int [1:42], number of lesions per diseased case

  • lesions$IDs, num [1:42, 1:15], numeric labels of lesions on diseased cases

  • lesions$weights, num [1:42, 1:15], weights (or clinical importances) 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 [1:2, 1:4, 1:89, 1:16], truth table structure

  • descriptions$design, chr "FCTRL", study design, factorial dataset

  • descriptions$modalityID, chr [1:2] "1" "2", modality labels

  • descriptions$readerID, chr [1:4] "1" "2" "3" "4", reader labels

References

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.

Examples

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"
## PlotEmpiricalOperatingCharacteristics(dataset = dataset06, opChType = "wAFROC")$Plot