A176478 Years in which there are five Saturdays in the month of February.

1772, 1812, 1840, 1868, 1896, 1908, 1936, 1964, 1992, 2020, 2048, 2076, 2116, 2144, 2172, 2212, 2240, 2268, 2296, 2308, 2336, 2364, 2392, 2420, 2448, 2476, 2516, 2544, 2572, 2612, 2640, 2668, 2696, 2708, 2736, 2764, 2792, 2820, 2848, 2876, 2916, 2944, 2972, 3012, 3040

Offset: 1

Author

Robert G. Wilson v, Apr 18 2010

Keywords

• nonn

Links

• 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, 0, 1, -1).

Crossrefs

Cf. A119406 (Sun), A135795 (Mon), A143994 (Tue), A141039 (Wed), A143995 (Thu), A141287 (Fri).

Programs

Mathematica

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

Extensions

Wrong years removed by J. Lowell, Apr 22 2010

Corrected and extended by Jean-François Alcover, Mar 27 2020