回复 第4楼 的 qiye:
时间是可以cut的,[s:11]
<br />
> mydat=Sys.time() + runif(1000, max=3600*24*2)<br />
> range(mydat)<br />
[1] "2013-09-29 15:15:44 CST" "2013-10-01 15:08:18 CST"<br />
> table(cut(mydat, seq(as.POSIXct("2013-09-29"), as.POSIXct("2013-10-2"), by="1 hours", include.lowest = TRUE )))</p>
<p>2013-09-29 00:00:00 2013-09-29 01:00:00 2013-09-29 02:00:00 2013-09-29 03:00:00<br />
0 0 0 0<br />
2013-09-29 04:00:00 2013-09-29 05:00:00 2013-09-29 06:00:00 2013-09-29 07:00:00<br />
0 0 0 0<br />
2013-09-29 08:00:00 2013-09-29 09:00:00 2013-09-29 10:00:00 2013-09-29 11:00:00<br />
0 0 0 0<br />
2013-09-29 12:00:00 2013-09-29 13:00:00 2013-09-29 14:00:00 2013-09-29 15:00:00<br />
0 0 0 19<br />
2013-09-29 16:00:00 2013-09-29 17:00:00 2013-09-29 18:00:00 2013-09-29 19:00:00<br />
23 26 21 22<br />
2013-09-29 20:00:00 2013-09-29 21:00:00 2013-09-29 22:00:00 2013-09-29 23:00:00<br />
23 18 26 15<br />
2013-09-30 00:00:00 2013-09-30 01:00:00 2013-09-30 02:00:00 2013-09-30 03:00:00<br />
16 26 19 25<br />
2013-09-30 04:00:00 2013-09-30 05:00:00 2013-09-30 06:00:00 2013-09-30 07:00:00<br />
24 16 24 12<br />
2013-09-30 08:00:00 2013-09-30 09:00:00 2013-09-30 10:00:00 2013-09-30 11:00:00<br />
27 22 20 19<br />
2013-09-30 12:00:00 2013-09-30 13:00:00 2013-09-30 14:00:00 2013-09-30 15:00:00<br />
16 24 12 20<br />
2013-09-30 16:00:00 2013-09-30 17:00:00 2013-09-30 18:00:00 2013-09-30 19:00:00<br />
15 27 21 18<br />
2013-09-30 20:00:00 2013-09-30 21:00:00 2013-09-30 22:00:00 2013-09-30 23:00:00<br />
15 26 19 21<br />
2013-10-01 00:00:00 2013-10-01 01:00:00 2013-10-01 02:00:00 2013-10-01 03:00:00<br />
21 21 16 16<br />
2013-10-01 04:00:00 2013-10-01 05:00:00 2013-10-01 06:00:00 2013-10-01 07:00:00<br />
20 20 18 22<br />
2013-10-01 08:00:00 2013-10-01 09:00:00 2013-10-01 10:00:00 2013-10-01 11:00:00<br />
24 23 22 18<br />
2013-10-01 12:00:00 2013-10-01 13:00:00 2013-10-01 14:00:00 2013-10-01 15:00:00<br />
26 27 25 4<br />
2013-10-01 16:00:00 2013-10-01 17:00:00 2013-10-01 18:00:00 2013-10-01 19:00:00<br />
0 0 0 0<br />
2013-10-01 20:00:00 2013-10-01 21:00:00 2013-10-01 22:00:00 2013-10-01 23:00:00<br />
0 0 0 0 </p>
<p>
</p>