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 A164513 #6 Jul 30 2020 13:22:07 %S A164513 887,1129,1327,1637,1669,1951,2179,2311,2477,2557,2971,3089,3137,3229, %T A164513 3271,3413,3469,3739,3947,3967,4027,4177,4297,4523,4759,4831,5119, %U A164513 5237,5351,5449,5531,5591,5717,5749,5903,5953,5987,6173,6397,6427,6491,6737 %N A164513 Primes with gap to the next prime no less than 20. %C A164513 Includes all terms of A031938. %H A164513 Harvey P. Dale, <a href="/A164513/b164513.txt">Table of n, a(n) for n = 1..5000</a> %t A164513 (*M6*)a=2;S={};Do[b=NextPrime[a];If[b-a>=20,AppendTo[S,a]];a=b,{2000}];S %t A164513 Select[Partition[Prime[Range[1000]],2,1],#[[2]]-#[[1]]>19&][[All,1]] (* _Harvey P. Dale_, Jul 30 2020 *) %Y A164513 Cf. A031938 Lower prime of a difference of 20 between consecutive primes. %K A164513 nonn %O A164513 1,1 %A A164513 _Zak Seidov_, Aug 14 2009