I'm trying to replicate the graph similar to the following (originally found HERE http://37signals.com/svn/posts/3019-the-rhythms-of-37signals)
它在概念上很简单,但我对如何在 R 中做到这一点感到有点困惑。
总结一下:我想按一周中的每一天生成一天 24 小时内的行为频率直方图(24 级因子变量)。然后,我想将这些直方图堆叠在一起,以便可以轻松比较一天中一小时内的行为分布(再次参见示例)。
例如,我的数据可能如下所示:
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
我该如何实现上面链接中的图表?我很糟糕ggplot
,但有一种感觉,这可能是解决方案。
谢谢!
像这样的东西吗?
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
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)