Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I M4961 N2127 #38 Aug 07 2023 01:09:01
%S 1,15,29,12,26,12,26,9,23,7,21,4,18,2,16,30,13,27,10,24,8,22,5,19,3,
%T 17,31,14,28,11,25,11,25,8,22,6,20,3,17,1,15,29,12,26,9,23,7,21,4,18,
%U 2,16,30,13,27,10,24,10,24,7,21,5,19,2,16,30,14,28,11,25,8,22,6,20,3,17,1,15
%N Dates at fortnightly intervals from Jan 01 in the Julian calendar.
%C Sequence assumes that the first year is the year after a leap year.
%C Periodic sequence with period 1461. - _John Cerkan_, Mar 26 2017
%D Archimedeans Problems Drive, Eureka, 13 (1950), 11.
%D N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
%D N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
%H John Cerkan, <a href="/A001356/b001356.txt">Table of n, a(n) for n = 1..10000</a>
%H John Cerkan, <a href="/A001356/a001356.py.txt">Python 2.7</a>
%H <a href="/index/Ca#calendar">Index entries for sequences related to calendars</a>
%t (* First program no longer functions in current Mathematica versions *)
%t (* first do *) Needs["Calendar`"]; (* then *) Table[Calendar`DaysPlus[{1, 1, 1}, 14 n][[3]], {n, 0, 77}] (* _Robert G. Wilson v_, Apr 18 2010 *)
%t Table[DateValue[DayPlus[{1,1,1},14 n,CalendarType->"Julian"],"Day"],{n,0,77}] (* recent Mathematica version, Giovanni Resta, Mar 22 2017; amended, _Ray Chandler_, Aug 07 2023 *)
%Y Cf. A051121.
%K nonn,easy,nice
%O 1,2
%A _N. J. A. Sloane_
%E More terms from Larry Reeves (larryr(AT)acm.org), Mar 17 2000
%E One more term from _Robert G. Wilson v_, Apr 18 2010
%E Name edited by _Charles R Greathouse IV_, Mar 27 2017