A002651 Dates at 16-day intervals starting at the beginning of a leap year.

16, 1, 17, 4, 20, 5, 21, 7, 23, 8, 24, 10, 26, 11, 27, 12, 28, 14, 30, 15, 1, 17, 2, 18, 3, 19, 7, 23, 8, 24, 10, 26, 11, 27, 13, 29, 14, 30, 15, 1, 17, 2, 18, 4, 20, 5, 21, 6, 22, 10, 26, 11, 27, 13, 29, 14, 30, 16, 1, 17, 2, 18, 4, 20, 5, 21, 7, 23, 8, 24, 9, 25, 13, 29, 14, 30, 16, 1, 17, 3, 19, 4, 20, 5

Offset

1,1

Links

Table of n, a(n) for n=1..84.

Mathematica

Table[DateValue[DayPlus[{2015, 12, 31}, 16n], "Day"], {n, 100}](* The program uses the DateValue function from Mathematica version 10 *) (* Harvey P. Dale, May 14 2016 *)

Crossrefs

Sequence in context: A301909 A070583 A133821 * A097522 A302153 A040271

Adjacent sequences: A002648 A002649 A002650 * A002652 A002653 A002654

Keyword

nonn,easy

Author

John Daly (john.daly(AT)cc2smtp.NRCan.gc.ca)

Extensions

More terms from David W. Wilson.

Status

approved