Função de corte na rotulagem R sem notações científicas para uso em ggplot2
Eu uso cut e classIntervals para agrupar dados em R, que depois plotamos com ggplot2. Então, uma operação básica cortando quantis com n = 3 seria assim:
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)
Ondeb seria:
[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]
então a primeira linha desta saída é um vetor com meus dados agrupados que eu posso usar em ggplot2. Mas ao invés de ter este vetor em notação científica, eu gostaria que os rótulos fossem[1,70] (70,34000] (3400,1000000]
Como posso conseguir isso? Qualquer ajuda seria apreciada, também se você tiver outros métodos em vez de cortar e classInt para obter o mesmo resultado.