如何将日期转换为日期计数？

Question

我有POSIXct个日期存储在向量中，我想绘制/提取每个日期的出现次数。

head(dates1, 10)
 [1] NA               NA               NA               "2012-01-19 UTC"
 [5] NA               NA               NA               "2013-04-02 UTC"
 [9] "2012-10-04 UTC" "2012-12-20 UTC"

我最接近的是：

hist(dates1, breaks = 27, freq = TRUE, ylim = c(0, 80))

然而，这非常粗糙。我想要做的是将数据转换为具有每个日期计数的向量，以便我可以对其进行更多计算和绘图。我怎么能做到这一点？

Answer 1

作为Richard Scriven notes，它们看起来像Date。无论是Date还是POSIXct，这都可能会有所帮助：

foo <- table(as.Date(dates1))

这当然只会给你非零计数，这可能不是你想要的。如果您希望（可能）对dates1中未显示的日期进行零计数，请在factor之前将其转换为table：

dates1 <- as.Date(dates1)
foo <- factor(dates1,levels=as.character(seq(min(dates1),max(dates1),by="day")))
table(foo)