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 A132243 #21 Aug 10 2025 00:48:57
%S A132243 29,31,59,61,149,151,179,181,239,241,269,271,419,421,569,571,599,601,
%T A132243 659,661,809,811,1019,1021,1049,1051,1229,1231,1289,1291,1319,1321,
%U A132243 1619,1621,1949,1951,2129,2131,2309,2311,2339,2341,2549,2551,2729,2731,2789
%N A132243 Twin primes congruent to {1, 29} mod 30.
%C A132243 Twin primes of the form 5*n +- 1. - _Bruno Berselli_, Aug 26 2014
%H A132243 Roger L. Bagula, <a href="/A132243/b132243.txt">Table of n, a(n) for n = 1..144</a>
%H A132243 C. K. Caldwell, <a href="http://primes.utm.edu">The Prime Pages</a>.
%H A132243 C. K. Caldwell, <a href="https://t5k.org/glossary/page.php?sort=TwinPrime">Twin Primes</a>.
%H A132243 Omar E. Pol, <a href="http://www.polprimos.com">Determinacion geometrica de los numeros primos y perfectos</a>.
%t A132243 a[0] = 9; a[n_] := a[n] = a[n - 1] + 10; Flatten[Table[If[PrimeQ[a[n]] && PrimeQ[a[n] + 2], {a[n],a[n] + 2}, {}], {n, 0, 300}]] (* _Roger L. Bagula_, May 04 2008 *)
%t A132243 Flatten[Select[#+{-1,1}&/@(5*Range[0,600,2]),AllTrue[#,PrimeQ]&]] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Feb 21 2020 *)
%Y A132243 Cf. A001097, A001359, A006512, A039949, A129805, A132240.
%K A132243 nonn,easy
%O A132243 1,1
%A A132243 _Omar E. Pol_, Aug 15 2007
%E A132243 More terms from _Roger L. Bagula_, May 04 2008