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 A154331 #13 Sep 08 2022 08:45:40
%S A154331 1,3,4,6,11,13,17,20,29,39,94,108,136,154,158,172,214,227,245,256,262,
%T A154331 283,288,290,308,315,328,357,358,371,403,413,414,420,475,491,510,522,
%U A154331 536,543,546,556,559,561,581,585,622,630,633,647,666,669,676,699,735
%N A154331 Numbers m such that 12 m^2 is the average of a twin prime pair.
%H A154331 Amiram Eldar, <a href="/A154331/b154331.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from Harvey P. Dale)
%t A154331 Select[Range[800],AllTrue[12#^2+{1,-1},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Aug 27 2014 *)
%o A154331 (PARI) for(i=1,999, isprime(12*i^2+1) & isprime(12*i^2-1) & print1(i","))
%o A154331 (Magma) [m:m in [1..740]| IsPrime(12*m^2-1) and IsPrime(12*m^2+1)]; // _Marius A. Burtea_, Jan 23 2020
%Y A154331 Cf. A037073, A154671.
%K A154331 nonn
%O A154331 1,2
%A A154331 _M. F. Hasler_, Jan 15 2009