按等距的時間間隔聚合R中的數據幀

Question

我想按時間匯總數據並創建等距的時間間隔：

date<- c(as.POSIXct("2011-08-08 21:00:00"), as.POSIXct("2011-08-08 21:26:00"))
value<-c(1,2)
dt<-data.frame(date, value)

DT<-aggregate(cbind(dt$value),list(cut(dt$date, breaks="10 min")),sum) 

dt:
2011-08-08 21:00:00 1
2011-08-08 21:26:00 2

DT:
2011-08-08 21:00:00 1
2011-08-08 21:20:00 2

我想要的是：

2011-08-08 21:00:00 1
2011-08-08 21:10:00 NA
2011-08-08 21:20:00 2

無論如何，不​​使用Zoo或xts就能做到這一點嗎？

Answer 1

我在最后一行假設您正在嘗試避免使用軟件包。

與基礎R堅持，你可以嘗試tapply ，但你的日期將成為rownames （或names ，如果你跳過data.frame步驟）：

data.frame(value = tapply(cbind(dt$value),
                          list(cut(dt$date, breaks="10 min")),
                          sum))
#                     value
# 2011-08-08 21:00:00     1
# 2011-08-08 21:10:00    NA
# 2011-08-08 21:20:00     2