scale_x_discrete - Mil separadores en la etiqueta del eje xoy

rotate axis labels ggplot2

Question

Me gustaría tener lindas etiquetas en el eje y. Por ejemplo, prefiero tener 1,000 en lugar de 1000. ¿Cómo puedo hacer esto en ggplot? Aquí hay un ejemplo mínimo:

x <- data.frame(a=c("a","b","c","d"), b=c(300,1000,2000,4000))
ggplot(x,aes(x=a, y=b))+
               geom_point(size=4)

Gracias por cualquier pista.

Answer 1

Con los paquetes de scales , algunas opciones de formato están disponibles: coma, dólar, porcentaje. Vea los ejemplos en ?scale_y_continuous .

Creo que esto hace lo que quieres:

library(ggplot2)
library(scales)

x <- data.frame(a=c("a","b","c","d"), b=c(300,1000,2000,4000))

ggplot(x, aes(x = a, y = b)) + 
  geom_point(size=4) +
  scale_y_continuous(labels = comma)

Answer 2

Pretifique miles usando cualquier caracter con la funcion de format() basico format() :

Ejemplo 1 (separado por comas).

format(1000000, big.mark = ",", scientific = FALSE)
[1] "1,000,000"

Ejemplo 2 (espacio separado).

format(1000000, big.mark = " ", scientific = FALSE)
[1] "1 000 000"

Aplique format() a las etiquetas de ejes ggplot utilizando una función anónima:

ggplot(x, aes(x = a, y = b)) +
        geom_point(size = 4) +
        scale_y_continuous(labels = function(x) format(x, big.mark = ",",
                                                       scientific = FALSE))