riskcols.Rd
Colors for KPIs cutoffs
riskcols(x)
breakpoints
string of length(x) - 1 with suitable colors.
length(x) - 1
riskcols(1:4) #> [1] "green" "yellow" "red"