login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A061251 Days in year to end of n-th month starting Jan 01 in a year just following a leap year or millennium. 7
0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334, 365, 396, 424, 455, 485, 516, 546, 577, 608, 638, 669, 699, 730, 761, 789, 820, 850, 881, 911, 942, 973, 1003, 1034, 1064, 1095, 1126, 1155, 1186, 1216, 1247, 1277, 1308, 1339, 1369, 1400, 1430, 1461 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

COMMENTS

y1=2001 y2=2004 in the PARI code.

In order to define this infinite sequence uniquely one has to fix a starting year. From the given entries this could be any year lying three years before a leap year. In accordance with A008685 let's start with Jan 01 2001, three years before 2004 (following the leap year 2000). - Wolfdieter Lang, May 04 2011

LINKS

Table of n, a(n) for n=0..48.

PROG

(PARI)

dom(y1, y2) = /* days of the year */

{ local(x, y, m, s=0);

  m=ml=vector(12);

  m=[31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31]; /* days of month */

  /* May be leap year if year div by 4: */

  for(y=y1, y2, for(x=1, 12, s+=m[x]; if(x==2, if(y%4==0, s++);

  /* Adjust if century mod(4)<>0: */

  if(floor(y/100)%4 & y%100==0, s--);

);

print1(s", ") ) ) }

(Cino Hilliard, Mar 29 2005)

CROSSREFS

Partial sums of A008685.

Sequence in context: A218794 A218771 A109356 * A166604 A039350 A043173

Adjacent sequences:  A061248 A061249 A061250 * A061252 A061253 A061254

KEYWORD

nonn

AUTHOR

N. J. A. Sloane, Jun 03 2001

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 22 00:52 EDT 2019. Contains 328315 sequences. (Running on oeis4.)