我有这样的数据集,它记录在30分钟步:R - 将30分钟的数据帧聚合为小时数据帧?
structure(list(Particles = c(0.596667, 0.27, 0.153333, 0, 0.753333,
0, 0.35, 0.506667, 1.6, 0.116667), PM = c(35.5158928571429, 16.0714285714286,
9.12696428571429, 0, 44.84125, 0, 20.8333333333333, 30.15875,
95.2380952380953, 6.94446428571429), timestamp = c(1493310389147,
1493310419191, 1493310449254, 1493310479270, 1493310509313, 1493310539387,
1493310569416, 1493310599465, 1493310629525, 1502378711339),
date = structure(c(1493310389.147, 1493310419.191, 1493310449.254,
1493310479.27, 1493310509.313, 1493310539.387, 1493310569.416,
1493310599.465, 1493310629.525, 1502378711.339), class = c("POSIXct",
"POSIXt"), tzone = "UTC-1"), site = c("ABC", "ABC",
"ABC", "ABC", "ABC", "ABC",
"ABC", "ABC", "ABC", "ABC"
), code = c("ABC", "ABC", "ABC",
"ABC", "ABC", "ABC", "ABC",
"ABC", "ABC", "ABC"), key_date = c("2017-04-27",
"2017-04-27", "2017-04-27", "2017-04-27", "2017-04-27", "2017-04-27",
"2017-04-27", "2017-04-27", "2017-04-27", "2017-08-10")), .Names = c("Particles",
"PM", "timestamp", "date", "site", "code", "key_date"), row.names = c(NA,
10L), class = "data.frame")
我怎么能它聚集到每小时一步?我的列从一个数据框到另一个数据框有所不同,所以我需要一种聚合它的方式,以便它也可以应用于其他数据框。
编辑:
我试了一下:
res <- aggregate(Df['PM'], list(date = cut(as.POSIXct(Df$date), "1 hour")), sum)
但这只是给我留下两列,其余的都没有了。我怎样才能保持他们呢?
如何使用'cut'即'DF1 %>%group_by(小时=剪切(日期,休息=“小时”))%>%汇总(PM =总计(PM))' – akrun
@akrun我该怎么做?我得到这个错误'警告:%>%中的错误:找不到函数“%>%”' – laukok
我假设你有'library(dplyr); df1%>%group_by(..' – akrun