OFFSET

0,1

COMMENTS

EXAMPLE

a(1)=335 because there are 335 days left in a leap year at the end of January, the first month.

MATHEMATICA

Join[{366}, (DateDifference[#, {2016, 12, 31}]&/@Table[Select[Table[ DatePlus[ {2016, m, 1}, {d, "Day"}], {d, 30}], #[[2]]==m&][[-1]], {m, 12}])[[All, 1]]] (* Harvey P. Dale, Nov 29 2020 *)

CROSSREFS

KEYWORD

fini,full,nonn

AUTHOR

Rick L. Shepherd, Jul 23 2002

STATUS

approved