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 A204665 #16 Aug 04 2024 18:47:04 %S A204665 19609,25471,35677,43801,48679,59281,74959,103237,152311,167809, %T A204665 188197,206827,257731,315127,323149,326257,326779,348097,359929, %U A204665 363067,365851,377911,381859,405091,417037,428899,432661,444349,459961,501511,521929,528559,544549,547171,554977,561109,569269,582319,590437,610339,622189 %N A204665 Primes p such that q-p = 52, where q is the next prime after p. %H A204665 Charles R Greathouse IV, <a href="/A204665/b204665.txt">Table of n, a(n) for n = 1..10000</a> %H A204665 <a href="/index/Pri#gaps">Index entries for primes, gaps between</a> %F A204665 a(n) >> n log^2 n. - _Charles R Greathouse IV_, Sep 14 2015 %t A204665 Transpose[Select[Partition[Prime[Range[52000]],2,1],Last[#]-First[#] == 52&]][[1]] (* _Harvey P. Dale_, Jul 18 2014 *) %t A204665 Prime[#]&/@Flatten[Position[Differences[Prime[Range[51000]]],52]] (* _Harvey P. Dale_, Aug 04 2024 *) %o A204665 (PARI) is(n)=isprime(n) && nextprime(n+1)==n+52 \\ _Charles R Greathouse IV_, Sep 14 2015 %K A204665 nonn %O A204665 1,1 %A A204665 _N. J. A. Sloane_, Jan 17 2012