# NOT RUN {
library(psycho)
n_hit <- 9
n_fa <- 2
n_miss <- 1
n_cr <- 7
indices <- psycho::dprime(n_hit, n_fa, n_miss, n_cr)
df <- data.frame(
  Participant = c("A", "B", "C"),
  n_hit = c(1, 2, 5),
  n_fa = c(6, 8, 1)
)
indices <- psycho::dprime(
  n_hit = df$n_hit,
  n_fa = df$n_fa,
  n_targets = 10,
  n_distractors = 10,
  adjusted = FALSE
)
# }
Run the code above in your browser using DataLab