This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A143994 #20 Jul 26 2023 20:32:07
%S A143994 1752,1780,1820,1848,1876,1916,1944,1972,2000,2028,2056,2084,2124,
%T A143994 2152,2180,2220,2248,2276,2316,2344,2372,2400,2428,2456,2484,2524,
%U A143994 2552,2580,2620,2648,2676,2716,2744,2772,2800,2828,2856,2884,2924,2952,2980,3020,3048
%N A143994 Years in which there are five Tuesdays in the month of February.
%H A143994 <a href="/index/Ca#calendar">Index entries for sequences related to calendars</a>
%H A143994 <a href="/index/Rec#order_14">Index entries for linear recurrences with constant coefficients</a>, signature (1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1).
%p A143994 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
%t A143994 (* Needs Mma version >= 9.0 *)
%t A143994 okQ[y_] := LeapYearQ[{y}] && DayName[{y, 2, 1}] == Tuesday;
%t A143994 Select[Range[1752, 3051, 4], okQ] (* _Jean-François Alcover_, Mar 27 2020 *)
%Y A143994 Cf. A119406 (Sun), A135795 (Mon), A141039 (Wed), A143995 (Thu), A141287 (Fri), A176478 (Sat).
%K A143994 nonn
%O A143994 1,1
%A A143994 _J. Lowell_, Sep 07 2008
%E A143994 More terms from _R. J. Mathar_, Mar 29 2010
%E A143994 a(1) = 1752 inserted by _Jean-François Alcover_, Mar 27 2020