I have this data: (complete for December)
date sessions 1 2014-12-01 1932 2 2014-12-02 1828 3 2014-12-03 2349 4 2014-12-04 8192 5 2014
With lubridate,
lubridate
mydates <- interval(start = "2014-12-05", end = "2014-12-25") NewDate <- Dates[which(date %within% mydates),]