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 A204792 #9 Aug 20 2024 16:13:44 %S A204792 173359,175141,186481,203461,218287,253159,302329,399283,449473, %T A204792 458239,459523,517747,524521,546391,651517,675643,677239,703561, %U A204792 710119,724651,762409,914047,1015207,1023871,1037143,1072231,1072543,1074763,1149061,1189483,1195291 %N A204792 Primes p followed by a gap of 70 = nextprime(p) - p. %H A204792 Robert Israel, <a href="/A204792/b204792.txt">Table of n, a(n) for n = 1..8813</a> %H A204792 <a href="/index/Pri#gaps">Index entries for primes, gaps between</a>. %p A204792 P:= select(isprime, [seq(i,i=3..1.1*10^6,2)]): %p A204792 L:= P[2..-1]-P[1..-2]: %p A204792 R:= P[select(t -> L[t]=70, [$1..nops(L)])]; # _Robert Israel_, Oct 03 2017 %o A204792 (PARI) p=0; g=70; for(c=1, 100, while(g+p!=p=nextprime(p+1), ); print1(", "p-g)) \\ %K A204792 nonn %O A204792 1,1 %A A204792 _M. F. Hasler_, Jan 19 2012