2017-07-29

Anotar diagrama de caja en ggplot2

Title

Problema

Deseamos anotar el siguiente diagrama de caja en ggplot2 y añadir los 5 números de Tukey: mínimo, bigote inferior, mediana, bigote superior, máximo.

fivenum(iris$Sepal.Width)
[1] 2.0 2.8 3.0 3.3 4.4
library(ggplot2)
ggplot(iris, aes(factor(0), Sepal.Width)) + 
geom_boxplot() + xlab("") + scale_x_discrete(breaks = NULL)

Solución

Creamos el data frame five con los 5 números de Tukey que utilizamos en los argumentos de geom_text para anotar el gráfico.

five <- data.frame(x = rep(1, 5), five = fivenum(iris$Sepal.Width))
ggplot(iris, aes(x = 0, y = Sepal.Width)) + 
  geom_boxplot() + xlab("") + scale_x_discrete(breaks = NULL) + 
  geom_text(data = five, aes(x = 0, y = five, label = five), nudge_x = 0.5)

Referencias

Entradas relacionadas

No hay comentarios:

Publicar un comentario

Nube de datos