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),
year = 1999:2001)
print(dt)
HSS(dt)
Run the code above in your browser using DataLab