myItem <- matrix(
c(
0, -0.58 , 0 , 1, # delta+tau thurst thresh (gamma)
1, -0.58 , 0.776 , 1, # 0.196 -1.14
2, -0.58 , -0.697 , 1, # -1.277 -0.93
3, -0.58 , -0.629 , 1, # -1.209 -0.64
4, -0.58 , 0.55 , 1 # -0.03 0.25
), ncol =4, byrow=TRUE
)
itemListToThresholds(list(myItem))
Run the code above in your browser using DataLab