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 A138242 #15 Sep 08 2022 08:45:33
%S A138242 5,19,29,139,149,271,281,379,569,601,691,719,751,839,1009,1021,1051,
%T A138242 1499,1511,1601,1619,1709,1801,2161,2381,2539,2711,2819,2851,3001,
%U A138242 3109,3221,3229,3319,3449,3929,4111,4129,4139,4241,4261,4339,4871,4909,4969
%N A138242 Prime numbers k such that 12*k - 1, 12*k + 1 are twin primes.
%H A138242 Harvey P. Dale, <a href="/A138242/b138242.txt">Table of n, a(n) for n = 1..1000</a>
%e A138242 5*12 = 60 - 1 = 59 (prime), 5*12 = 60 + 1 = 61 (prime).
%t A138242 a=12;Select[Prime[Range[250]],PrimeQ[a*#-1]&&PrimeQ[a*#+1] &]
%t A138242 Select[Prime[Range[700]],AllTrue[12#+{1,-1},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Jan 11 2017 *)
%o A138242 (Magma) [n: n in [0..1000] |IsPrime(n) and IsPrime(12*n-1)and IsPrime(12*n+1)] // _Vincenzo Librandi_, Nov 24 2010
%K A138242 nonn
%O A138242 1,1
%A A138242 _Vladimir Joseph Stephan Orlovsky_, May 05 2008
%E A138242 More terms from _Vincenzo Librandi_, Mar 25 2010