A141039 - OEIS

A141039

Years in which there are five Wednesdays in the month of February.

1764, 1792, 1804, 1832, 1860, 1888, 1928, 1956, 1984, 2012, 2040, 2068, 2096, 2108, 2136, 2164, 2192, 2204, 2232, 2260, 2288, 2328, 2356, 2384, 2412, 2440, 2468, 2496, 2508, 2536, 2564, 2592, 2604, 2632, 2660, 2688, 2728, 2756, 2784, 2812, 2840, 2868, 2896, 2908, 2936, 2964, 2992, 3004, 3032

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

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).

MAPLE

A141039 := proc(n) nper := (n-1) mod 13 ; floor((n-1)/13)*400+op(1+nper , [1764, 1792, 1832, 1860, 1888, 1928, 1956, 1984, 2012, 2040, 2068, 2096, 2136] ) ; end proc: seq(A141039(n), n=1..80) ; # R. J. Mathar, Mar 29 2010

MATHEMATICA

(* Needs Mma version >= 9.0 *)

okQ[y_] := LeapYearQ[{y}] && DayName[{y, 2, 1}] == Wednesday;

Select[Range[1752, 3051, 4], okQ] (* Jean-François Alcover, Mar 27 2020 *)

CROSSREFS

Cf. A119406 (Sun), A135795 (Mon), A143994 (Tue), A143995 (Thu), A141287 (Fri), A176478 (Sat).

Sequence in context: A238050 A213804 A252309 * A205731 A151769 A165678

Adjacent sequences: A141036 A141037 A141038 * A141040 A141041 A141042

KEYWORD

nonn

AUTHOR

J. Lowell, Jul 30 2008

EXTENSIONS

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

Missing terms inserted by Jean-François Alcover, Mar 27 2020

STATUS

approved

Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.