将每小时间隔添加到频率表

Question

我正在尝试创建两个频率表，一个频率表是每天，而另一个频率是每小时。我可以很容易地获得每日价值。

C<-Data
C$Data<-format(C$Data, "%m/%d/%Y")
Freq_Day<- C %>% group_by(Data) %>% summarise(frequency = n())

但是，当我尝试通过以下操作获取每小时的频率

B<-Data
B$Data<-format(B$Data,"%m/%d/%Y %H:%M")
Freq_HRLY<-B %>% group_by(Data) %>% summarise(frequency = n())

它省略了数据集中根本没有发生的时间。因此，它返回的列小于（天数）* 24。我将如何以一小时为单位以相应的频率递增一列日期，以这种方式，如果“数据”中没有出现，则其值为0

Answer 1

一种方法是使用tidyr::complete填写Freq_HRLY数据中的遗漏小时数，该数据已经通过在min和{{1}之间创建一个小时间隔序列来计算} max。

Data