this is all I wanted from a `cut()` example: cut( 1:100, breaks=c(0,33,66,100), labels=c('bottom', 'middle', 'top') )