Skip to contents

Computes Tredoux's small-cell corrected diagnosticity ratio for one target-present/target-absent lineup pair.

Usage

diag_ratio_T(lineup_pres, lineup_abs, pos_pres, pos_abs, k1, k2)

Arguments

lineup_pres

A numeric vector of lineup choices for a lineup in which the target was present

lineup_abs

A numeric vector of lineup choices for a lineup in which the target was absent

pos_pres

A scalar, representing target position in TP lineup. Must be declared by user

pos_abs

A scalar, representing target position in TA lineup. Must be declared by user

k1

Number of targets in TP lineup. Must be specified by user (scalar).

k2

Number of targets in TA lineup. Must be specified by user (scalar).

Details

The corrected estimator is: $$DR_T = \frac{(n_{TP,s} + 0.5)/(N_{TP} + 0.5)} {(n_{TA,s} + 0.5)/(N_{TA} + 0.5)},$$ where \(n_{TP,s}\) and \(n_{TA,s}\) are suspect-selection counts in target-present and target-absent lineups, respectively, and \(N_{TP}\) and \(N_{TA}\) are the corresponding sample sizes.

References

Malpass, R. S. (1981). Effective size and defendant bias in eyewitness identification lineups. Law and Human Behavior, 5(4), 299-309.

Malpass, R. S., Tredoux, C., & McQuiston-Surrett, D. (2007). Lineup construction and lineup fairness. In R. Lindsay, D. F. Ross, J. D. Read, & M. P. Toglia (Eds.), Handbook of Eyewitness Psychology, Vol. 2: Memory for people (pp. 155-178). Mahwah, NJ: Lawrence Erlbaum Associates.

Tredoux, C. G. (1998). Statistical inference on measures of lineup fairness. Law and Human Behavior, 22(2), 217-237.

Tredoux, C. (1999). Statistical considerations when determining measures of lineup size and lineup bias. Applied Cognitive Psychology, 13, S9-S26.

Wells, G. L.,Leippe, M. R., & Ostrom, T. M. (1979). Guidelines for empirically assessing the fairness of a lineup. Law and Human Behavior, 3(4), 285-293.

Examples

#Data:
lineup_pres <- round(runif(100, 1, 6))
lineup_abs <- round(runif(70, 1, 5))
pos_pres <- 3
pos_abs <- 5

#Call:
diag_ratio_T(lineup_pres, lineup_abs, pos_pres, pos_abs, 6, 5)
#> [1] 1.273079
diag_ratio_T(lineup_pres, lineup_abs, 3, 5, 6, 5)
#> [1] 1.273079