A135795 Years in which there are five Mondays in the month of February.

1768, 1796, 1808, 1836, 1864, 1892, 1904, 1932, 1960, 1988, 2016, 2044, 2072, 2112, 2140, 2168, 2196, 2208, 2236, 2264, 2292, 2304, 2332, 2360, 2388, 2416, 2444, 2472, 2512, 2540, 2568, 2596, 2608, 2636, 2664, 2692, 2704, 2732, 2760, 2788, 2816, 2844, 2872, 2912, 2940, 2968, 2996, 3008, 3036

Offset: 1

Author

J. Lowell, Mar 03 2008

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

Crossrefs

Cf. A119406 (Sun), A143994 (Tue), A141039 (Wed), A143995 (Thu), A141287 (Fri), A176478 (Sat).

Programs

Mathematica

(* First do *) Needs["Calendar`"] (* then *) fQ[y_] := Mod[y, 4] == 0 && Mod[y, 400]!=0 && DayOfWeek[{y, 2, 1}] == Monday; Select[Range[1750, 3051], fQ@# &] (* Robert G. Wilson v, Jun 11 2010 *)
Select[Range[1768,3036,4],LeapYearQ[{#}]&& DayName[{#,2,1}]==Monday&] (* Harvey P. Dale, Aug 01 2017 *)

Extensions

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

Corrected by Harvey P. Dale, Aug 01 2017