日期差异的直方图

Ron*_*ity 3 r

我有一个降序日期的排序列表.如何获得当前行上的日期与下一行上的日期之间差异的概率历史记录?我想想象一下请求进入频率的频率.

09/11/2011 13:46:39
09/11/2011 13:45:18
09/11/2011 13:44:58
09/11/2011 13:40:02
09/11/2011 13:37:58
09/11/2011 13:36:09
09/11/2011 13:32:31
09/11/2011 13:25:29
09/11/2011 13:24:40
09/11/2011 13:23:48
Run Code Online (Sandbox Code Playgroud)

ps我之前从未使用过R,所以代码越多越好.谢谢.

And*_*rie 5

阅读数据

df <- read.table(textConnection("
09/11/2011 13:46:39
09/11/2011 13:45:18
09/11/2011 13:44:58
09/11/2011 13:40:02
09/11/2011 13:37:58
09/11/2011 13:36:09
09/11/2011 13:32:31
09/11/2011 13:25:29
09/11/2011 13:24:40
09/11/2011 13:23:48
"), sep="\n")
Run Code Online (Sandbox Code Playgroud)

转换为POSIXct日期

df$V1 <- as.POSIXct(df$V1, format="%d/%m/%Y %H:%M:%S")
Run Code Online (Sandbox Code Playgroud)

lattice用时间差加载和绘图histogram.

该函数diff非常便于计算滞后差异.您会注意到我也使用unclass 它是因为没有类的直方图方法difftime.

library(lattice)

histogram(unclass(-diff(df$V1)), xlab="Time difference")
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述

  • 如果你不想要直方图(即不是聚合箱),另一种选择是`plot(table(-diff(df $ V1))) (2认同)