A033172 Number of days in n years (n=3 is the first leap year).
365, 730, 1096, 1461, 1826, 2191, 2557, 2922, 3287, 3652, 4018, 4383, 4748, 5113, 5479, 5844, 6209, 6574, 6940, 7305, 7670, 8035, 8401, 8766, 9131, 9496, 9862, 10227, 10592, 10957, 11323, 11688, 12053, 12418, 12784, 13149, 13514, 13879
Offset: 1
Crossrefs
Cf. A033171.
Programs
-
Mathematica
Accumulate[Table[If[LeapYearQ[{y,1,1}],366,365],{y,2018,2058}]] (* Harvey P. Dale, Aug 09 2020 *)
Formula
From Chai Wah Wu, Jan 27 2020: (Start)
See caveat in A033171 formula section.
a(n) = a(n-1) + a(n-4) - a(n-5) for n > 5.
G.f.: x*(365*x^3 + 365*x^2 + 366*x + 365)/(x^5 - x^4 - x + 1). (End)
Extensions
a(19) corrected by Chai Wah Wu, Jan 27 2020