`age` in the `stroop_extended` data

[ASKurz]

It appears a few participants in the stroop_extended data have more than one level of age.

library(tidyverse)
data(stroop_extended, package = "bayes4psy")

stroop_extended |> 
  group_by(subject) |> 
  filter(n_distinct(age) > 1) |> 
  count(subject, age)

# A tibble: 10 × 3
# Groups:   subject [4]
   subject   age     n
   <fct>   <int> <int>
 1 R0DYS-C    18   365
 2 R0DYS-C    51   365
 3 R6AID-C    34   373
 4 R6AID-C    44   373
 5 R6AID-C    46   373
 6 R6AID-D    47   269
 7 R6AID-D    74   269
 8 RGA7X-A     7   542
 9 RGA7X-A     8   542
10 RGA7X-A    10   542

[demsarjure]

Thanks for reporting the issue. Let me fix this promptly.