JD Long - 4 months ago 51

R Question

Is there a simple R idiom for getting a vector of the days in a given year? I can do the following which does ok... except for leap years:

`dtt <- as.Date( paste( as.character(year), "-1-1", sep="") ) + seq( 0,364 )`

I could, obviously, add a line to filter out any values in (year + 1) but I'm guessing there's a much shorter way to do this.

Answer

What about this:

```
R> length(seq( as.Date("2004-01-01"), as.Date("2004-12-31"), by="+1 day"))
[1] 366
R> length(seq( as.Date("2005-01-01"), as.Date("2005-12-31"), by="+1 day"))
[1] 365
R>
```

This uses nuttin' but base R to compute correctly on dates to give you your vector. If you want higher-level operators, look e.g. at lubridate or even my more rudimentary RcppBDT which wraps parts of the Boost Time_Date library.