"N" <-
  40

"n_scenarios" <-
  8

"n_groups" <-
  5

"scenario_id" <-
c(1, 2, 3, 4, 5, 6, 7, 8, 1, 2, 3, 4, 5, 6, 7, 8, 1, 2, 3, 
4, 5, 6, 7, 8, 1, 2, 3, 4, 5, 6, 7, 8, 1, 2, 3, 4, 5, 6, 
7, 8)

"group_id" <-
c(1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 
3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 
5, 5)

"y" <- 
c(0.375, 0, 0.375, 0, 0.333333333333333, 1, 0.125, 1, 0.25, 0, 0.5, 0.125,
0.5, 1, 0.125, 0.857142857142857, 0.5, 0.666666666666667, 0.333333333333333, 0,
0.142857142857143, 1, 0, 1, 0.142857142857143, 0, 0.714285714285714, 0,
0.285714285714286, 1, 0.142857142857143, 1, 0.428571428571429, 0,
0.285714285714286, 0.857142857142857, 0.857142857142857, 0.857142857142857,
0.142857142857143, 0.75)