Eu estou olhando para o menu de exemplo do comandocut() (example(cut)), especificamente esta parte:

cut> aaa <- c(1,2,3,4,5,2,3,4,5,6,7)

cut> cut(aaa, 3)
[1] (0.994,3] (0.994,3] (3,5]     (3,5]     (3,5]     (0.994,3]
[7] (3,5]     (3,5]     (3,5]     (5,7.01]  (5,7.01] 
Levels: (0.994,3] (3,5] (5,7.01]

cut> cut(aaa, 3, dig.lab = 4, ordered = TRUE)
[1] (0.994,2.998] (0.994,2.998] (2.998,5.002] (2.998,5.002]
[5] (2.998,5.002] (0.994,2.998] (2.998,5.002] (2.998,5.002]
[9] (2.998,5.002] (5.002,7.006] (5.002,7.006]
Levels: (0.994,2.998] < (2.998,5.002] < (5.002,7.006]

cut> ## one way to extract the breakpoints
cut> labs <- levels(cut(aaa, 3))

cut> cbind(lower = as.numeric( sub("\\((.+),.*", "\\1", labs) ),
cut+       upper = as.numeric( sub("[^,]*,([^]]*)\\]", "\\1", labs) ))
     lower upper
[1,] 0.994  3.00
[2,] 3.000  5.00
[3,] 5.000  7.01

Onde os intervalos sãofechado à direita (como mostrado acima), então ele me mostra uma maneira de extrair os pontos de interrupção dos dados usandocbind()

Agora, vamos supor que meus dados serão cortados, mas indicando que os intervalos sãofechado à esquerda.

cut(aaa, 3, dig.lab = 4, ordered = TRUE, right = FALSE)

Como posso extrair agora meus pontos de interrupção usando o mesmo comandocbind()? (Se houver mais maneiras, de nada)