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 A134123 #16 Sep 14 2015 15:51:58 %S A134123 28229,73189,86629,105769,106543,113843,137029,156371,157579,163259, %T A134123 166099,168803,172441,177043,177691,179849,180569,183713,203713, %U A134123 204251,206651,220973,222199,226943,229849,233021,234383,240209,242009,260269 %N A134123 Primes p such that q-p = 48, where q is the next prime after p. %H A134123 Charles R Greathouse IV, <a href="/A134123/b134123.txt">Table of n, a(n) for n = 1..10000</a> %H A134123 <a href="/index/Pri#gaps">Index entries for primes, gaps between</a> %t A134123 Transpose[Select[Partition[Prime[Range[25000]],2,1],Last[#]-First[#]==48&]][[1]] (* _Harvey P. Dale_, Feb 07 2011 *) %t A134123 Select[Prime[Range[25000]], NextPrime[#] - # == 48 &] %o A134123 (PARI) is(n)=nextprime(n+1)==n+48 && isprime(n) \\ _Charles R Greathouse IV_, Sep 14 2015 %Y A134123 Cf. A134122, A134124. %K A134123 nonn %O A134123 1,1 %A A134123 _Rick L. Shepherd_, Oct 08 2007