r - 将R中的时间数据绘制为各种分辨率(分钟，小时，秒等)。

Question

我有一些CSV数据，例如:

"Timestamp", "Count"
"2009-07-20 16:30:45", 10
"2009-07-20 16:30:45", 15
"2009-07-20 16:30:46", 8
"2009-07-20 16:30:46", 6
"2009-07-20 16:30:46", 8
"2009-07-20 16:30:47", 20

我可以使用read.cvs将其读入R。我想作图:

每秒的条目数，因此:

“2009-07-20 16:30:45”，2
“2009-07-20 16:30:46”，3
“2009-07-20 16:30:47”，1

每秒的平均值:

“2009-07-20 16:30:45”，12.5
“2009-07-20 16:30:46”，7.333
“2009-07-20 16:30:47”，20

与1和2相同，但按分钟，然后按小时。

在R中有什么方法可以做到这一点(按秒/分钟/等并绘图)？

Answer 1

读取数据，并将其转换为zoo对象:

R> X <- read.csv("/tmp/so.csv")
R> X <- zoo(X$Count, order.by=as.POSIXct(as.character(X[,1])))

请注意，由于时间戳记不唯一，这将显示警告。

任务1使用 aggregate和 length进行计数:

R> aggregate(X, force, length)
2009-07-20 16:30:45 2009-07-20 16:30:46 2009-07-20 16:30:47 
                  2                   3                   1 

任务2使用 aggregate:

R> aggregate(X, force, mean)
2009-07-20 16:30:45 2009-07-20 16:30:46 2009-07-20 16:30:47 
             12.500               7.333              20.000 

可以通过汇总最多高阶索引来以相同的方式完成任务3。您可以对合计结果调用 plot:

plot(aggregate(X, force, mean))