我想找出一个特定值连续出现在特定分区上的次数,然后显示该分区的较高计数。
例如,下表如下:
library(data.table)
rbind(setDT(data),data[,.(cause = paste(unique(cause),collapse=''),value = sum(value)),.(age)])
我想知道每个设备连续出现相同速度的最高次数。
因此,如果我按设备ID对它们进行分区,则会得到belo表
Device ID speed DateTime
--------------------------------------------------
07777778999 34 18-12-2016 17:15
07777778123 15 18-12-2016 18:10
07777778999 34 19-12-2016 19:30
07777778999 34 19-12-2016 12:15
07777778999 20 19-12-2016 13:15
07777778999 20 20-12-2016 11:15
07777778123 15 20-12-2016 9:15
07777778128 44 20-12-2016 17:15
07777778123 15 20-12-2016 17:25
07777778123 12 20-12-2016 17:35
07777778999 34 20-12-2016 17:45
07777778999 34 20-12-2016 17:55
07777778999 34 20-12-2016 18:50
07777778999 34 20-12-2016 18:55
所以我所需的输出将是
Device ID speed DateTime
--------------------------------------------------
07777778999 34 18-12-2016 17:15
07777778999 34 19-12-2016 19:30
07777778999 34 19-12-2016 12:15
07777778999 20 19-12-2016 13:15
07777778999 20 20-12-2016 11:15
07777778999 34 20-12-2016 17:45
07777778999 34 20-12-2016 17:55
07777778999 34 20-12-2016 18:50
07777778999 34 20-12-2016 18:55
07777778123 15 18-12-2016 18:10
07777778123 15 20-12-2016 9:15
07777778123 15 20-12-2016 17:25
07777778123 12 20-12-2016 17:35
07777778128 44 20-12-2016 17:15
-----------------------------------------------------------------
请注意,由于没有连续重复的值,因此未显示07777778128。''
实现此目标的可能方法是什么。 我能够获得每个设备的所有连续值的计数,但是它并没有给出最高的计数,而是给出了所有此类连续组的计数