我有一个包含一列的数据框
数百个日期格式的日期,例如:
as.Date(c("2011-08-13","2011-09-13","2010-06-12","2012-09-13","2010-09-13","2012-05-26","2012-07-20"))
现在我只想选择 15.03 < date < 15.8(3 月 15 日至 10 月 15 日之间的所有日期,不考虑年份)的行。有没有一种简单的方法可以在这样的情况下选择(索引)
道路?
我稍微修改了我接受的答案,如下:
a <- as.Date(c("2011-08-13","2011-09-13","2010-06-12","2012-09-13","2010-09-13","2012-05-26","2012-07-20"))
lower <- as.Date("03-15",format="%m-%d")
upper <- as.Date("08-15",format="%m-%d")
a[format(a,"%m-%d") < format(upper,"%m-%d") & format(a,"%m-%d") > format(lower,"%m-%d")]
[1] "2011-08-13" "2010-06-12" "2012-05-26" "2012-07-20"
最佳答案
在 base
,想法是使用函数format
:
a <- as.Date(c("2011-08-13","2011-09-13","2010-06-12","2012-09-13","2010-09-13","2012-05-26","2012-07-20"))
lower <- as.Date("2012-03-15")
upper <- as.Date("2012-08-15")
a[format(a,"%m-%d") < format(upper,"%m-%d") & format(a,"%m-%d") > format(lower,"%m-%d")]
[1] "2011-08-13" "2010-06-12" "2012-05-26" "2012-07-20"
关于r - 按日期间隔索引数据框,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/13911141/