A143994 Years in which there are five Tuesdays in the month of February.

1752, 1780, 1820, 1848, 1876, 1916, 1944, 1972, 2000, 2028, 2056, 2084, 2124, 2152, 2180, 2220, 2248, 2276, 2316, 2344, 2372, 2400, 2428, 2456, 2484, 2524, 2552, 2580, 2620, 2648, 2676, 2716, 2744, 2772, 2800, 2828, 2856, 2884, 2924, 2952, 2980, 3020, 3048

Offset

1,1

Links

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

Index entries for sequences related to calendars

Index entries for linear recurrences with constant coefficients, signature (1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1).

Maple

A143994 := proc(n) nper := (n-1) mod 13 ; floor((n-1)/13)*400+op(1+nper , [1780, 1820, 1848, 1876, 1916, 1944, 1972, 2000, 2028, 2056, 2084, 2124, 2152] ) ; end proc: seq(A143994(n), n=1..80) ; # R. J. Mathar, Mar 29 2010

Mathematica

(* Needs Mma version >= 9.0 *)
okQ[y_] := LeapYearQ[{y}] && DayName[{y, 2, 1}] == Tuesday;
Select[Range[1752, 3051, 4], okQ] (* Jean-François Alcover, Mar 27 2020 *)

Crossrefs

Cf. A119406 (Sun), A135795 (Mon), A141039 (Wed), A143995 (Thu), A141287 (Fri), A176478 (Sat).

Sequence in context: A172833 A172882 A251892 * A157325 A223448 A102327

Adjacent sequences: A143991 A143992 A143993 * A143995 A143996 A143997

Keyword

nonn

Author

J. Lowell, Sep 07 2008

Extensions

More terms from R. J. Mathar, Mar 29 2010

a(1) = 1752 inserted by Jean-François Alcover, Mar 27 2020

Status

approved