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 A145478 #16 Jan 24 2017 15:47:24 %S A145478 5,17,29,53,89,113,137,149,173,197,233,269,317,353,449,509,557,593, %T A145478 677,773,809,857,929,953,977,1013,1097,1109,1277,1289,1373,1409,1493, %U A145478 1613,1697,1733,1877,1913,1997,2069,2153,2273,2297,2333,2357,2417,2549,2609 %N A145478 Primes p such that (29 + p)/2 is prime. %C A145478 All these primes are congruent to 5 mod 12. %H A145478 Ivan Neretin, <a href="/A145478/b145478.txt">Table of n, a(n) for n = 1..10000</a> %t A145478 aa = {}; k = 29; Do[If[PrimeQ[(k + Prime[n])/2], AppendTo[aa, Prime[n]]], {n, 1, 500}];aa %o A145478 (PARI) first(n)=my(t=1, p, i=1); while(i<n, p=prime(i); i=i+1; if(p>2&&isprime((29+p)/2), print1(p,", "))) \\ _Anders Hellström_, Jan 22 2017 %Y A145478 Cf. A092109, A145471-A145480. %K A145478 nonn %O A145478 1,1 %A A145478 _Artur Jasinski_, Oct 11 2008