una - Graficar histogramas sobre variables factoriales

modificar ejes en r

Question

Estoy tratando de replicar el gráfico similar al siguiente (originalmente encontrado HERE )

Es conceptualmente simple, pero estoy un poco perplejo en cuanto a cómo hacerlo en R.
Para resumir: quiero generar histogramas de frecuencia de comportamiento en las 24 horas del día (variable factor de 24 niveles) por cada día de la semana. Luego, quiero apilar estos histogramas uno encima del otro para que la distribución del comportamiento a lo largo de la hora del día se pueda comparar fácilmente (nuevamente, vea el ejemplo).

Por ejemplo, mis datos podrían verse así:

 weekday hour count
Tuesday 15 553
Monday 1 53
Monday 10 539
Monday 15 629
Tuesday 9 281
Saturday 4 11
Monday 3 20
Sunday 3 10
Sunday 7 2
Sunday 2 17

¿Cómo hago para implementar la gráfica en el enlace de arriba? Soy terrible con ggplot , pero tengo la sensación de que es la solución más probable. ¡Gracias!

Answer 1

¿Algo como esto?

set.seed(1234)
df <- data.frame(weekday=rep(sort(unique(weekdays(.leap.seconds))), each=24),
hour=rep(1:24, 7), count=sample(2:600, 24*7, replace=T))
df$weekday <- factor(df$weekday, levels=c("Monday", "Tuesday", "Wednesday",
"Thursday", "Friday", "Saturday", "Sunday"), ordered=T)
df$hour <- factor(df$hour)
require(ggplot2)
p <- ggplot(data = df, aes(x=hour))
p <- p + geom_histogram(aes(weights=count, fill=weekday))
p <- p + scale_fill_brewer(palette="Set3")
p <- p + facet_wrap( ~ weekday, ncol=1)
p