Utilizo cut y classIntervals para agrupar datos en R que luego graficar con ggplot2. Entonces, una operación básica de corte por cuantiles con n = 3 se vería así:

library(classInt)

a<-c(1,10,100,1000,100000,1000000)
b<-cut(a, 
breaks=data.frame(
  classIntervals(
    a,n=3,method="quantile")[2])[,1],
include.lowest=T)

dóndeb sería:

[1] [1,70]          [1,70]          (70,3.4e+04]    (70,3.4e+04]    (3.4e+04,1e+06] (3.4e+04,1e+06]
Levels: [1,70] (70,3.4e+04] (3.4e+04,1e+06]

así que la primera línea de esta salida es un vector con mis datos agrupados que puedo usar en ggplot2. Pero en lugar de tener este vector en notación científica, me gustaría que las etiquetas fueran[1,70] (70,34000] (3400,1000000]

¿Cómo puedo lograrlo? Cualquier ayuda sería apreciada, también si tiene otros métodos en lugar de cortar y clasificar para lograr el mismo resultado.