数月又数月的循环

Question

我需要遍历日期列表，并提取每个月（一年中）的天数。 我没有找到在r中几个月和几年循环的方法，有没有办法做到？

添加我的列表的一部分作为示例：

dates<-as.Date(c("2014-11-07" ,"2014-11-08","2014-11-09", "2014-11-10" ,
"2014-11-11" ,"2014-11-12" ,"2014-11-13" ,"2014-11-14", "2014-12-01",
"2014-12-02" ,"2014-12-03","2014-12-04", "2014-12-20" ,"2014-12-21", 
"2014-12-22","2015-01-01" ,"2015-01-02" ,"2015-01-03" ,"2015-01-04" ,
"2015-01-05"))

谢谢

Answer 1

您可以使用格式来获​​取年份和计数，即

i1 <- format(dates, format = '%Y')
table(i1)
#2014 2015 
#  15    5 

每年，每月，

table(format(dates, format = '%Y/%m'))

#2014/11 2014/12 2015/01 
#      8       7       5