|
| |
|
|
A135795
|
|
Years in which there are five Mondays in the month of February.
|
|
9
|
|
|
|
1768, 1796, 1836, 1864, 1892, 1932, 1960, 1988, 2016, 2044, 2072, 2112, 2140, 2168, 2196, 2236, 2264, 2292, 2332, 2360, 2388, 2416, 2444, 2472, 2512, 2540, 2568, 2596, 2636, 2664, 2692, 2732, 2760, 2788, 2816, 2844, 2872, 2912, 2940, 2968, 2996, 3036
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Table of n, a(n) for n=1..42.
Index entries for sequences related to calendars
|
|
|
MAPLE
|
A135795 := proc(n) nper := (n-1) mod 13 ; floor((n-1)/13)*400+op(1+nper , [1768, 1796, 1836, 1864, 1892, 1932, 1960, 1988, 2016, 2044, 2072, 2112, 2140] ) ; end proc: seq(A135795(n), n=1..80) ; # R. J. Mathar, Mar 29 2010
|
|
|
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 *)
|
|
|
CROSSREFS
|
Cf. A119406, A143994, A141039, A143995, A141287.
Sequence in context: A031630 A031672 A031540 * A206201 A237900 A221118
Adjacent sequences: A135792 A135793 A135794 * A135796 A135797 A135798
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
J. Lowell, Mar 03 2008
|
|
|
EXTENSIONS
|
More terms from R. J. Mathar, Mar 29 2010
|
|
|
STATUS
|
approved
|
| |
|
|
