Question

我有一个日期矢量：

> (dput(head(list$date, 35)))
c("18.12.2003", "06.04.2005", "06.04.2005", "07.04.2005", "27.05.2005", 
"16.06.2009", "16.06.2009", "21.12.2009", "22.12.2009", "09.06.2011", 
"14.06.2011", "20.12.2011", "20.12.2011", "04.02.2008", "27.03.2009", 
"01.04.2009", "15.12.2009", "23.09.2005", "19.06.2005", "20.06.2005", 
"20.06.2005", "20.06.2005", "21.06.2005", "31.05.2005", "24.01.2007", 
"24.01.2007", "24.01.2007", "15.05.2007", "16.05.2007", "16.05.2007", 
"18.05.2007", "21.05.2007", "21.05.2007", "22.05.2007", "22.05.2007"
)

通过绘图，我可以看到最大值：

hist_data <- hist(as.Date(list$date, '%d.%m.%Y'), breaks="days", freq=TRUE)

可以通过以下方式获得发生：

(max(hist_data$counts, '%d.%m.%Y'))

但是，我想获得这个最大值的日期。是否可以使用日期直方图最大值max(...)？

感谢您的回答！

Answer 1

您可以使用table功能：

tab <- table(as.Date(list$date, '%d.%m.%Y'))
names(tab)[tab == max(tab)]
# [1] "2005-06-20" "2007-01-24"

获取日期列表的最大值

1 个答案: