我有以下数据框:
dates <- data.frame(rep(
seq(as.Date('2017-01-01'), as.Date('2017-12-31'), by = 'days'),
times = 1))
colnames(dates)<-"day"
我想在最近2周内将其细分。问题是我不想使用类似以下内容的东西:
dates[day>="2017-18-02" & day<="2017-05-02"]
因为该数据框将随着时间的推移而更新,并且最后一个日期将发生变化。
lubridate和dplyr的可能解决方案
library(lubridate)
library(dplyr)
testset %>%
filter(week(testset$date) == max(week(testset$date)))
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句