dt = data.table(below = c(0.5,0.3,0),
normal = c(0.3,0.3,0.7),
above = c(0.2,0.4,0.3),
tc_cat = c(-1,0,0),
lon = 1:3)
print(dt)
pp = ROC_curve(dt)
if(interactive()) plot(pp)
Run the code above in your browser using DataLab