tab(1:7, c(1, 3, 5), lbl_discrete())
tab(1:7, c(3, 5), lbl_discrete(first = "<= {r}"))
tab(1:7 * 1000, c(1, 3, 5) * 1000, lbl_discrete(unit = 1000))
# Misleading labels for non-integer data
chop(2.5, c(1, 3, 5), lbl_discrete())
Run the code above in your browser using DataLab