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. 6
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 April 19 08:55 EDT 2019. Contains 322241 sequences. (Running on oeis4.)