login
Upper prime of a difference of 20 between consecutive primes.
1

%I #14 Aug 26 2015 01:34:11

%S 907,1657,3109,3433,3967,5737,5923,6007,6823,7669,8263,8563,8803,8887,

%T 9277,10243,10453,10687,11047,11113,11197,11467,11617,11677,11887,

%U 12007,13147,13441,13669,14107,14197,15493,16963,17539,17827

%N Upper prime of a difference of 20 between consecutive primes.

%H <a href="/index/Pri#gaps">Index entries for primes, gaps between</a>

%F a(n) = A031938(n)+20.

%t Prime[Select[Range[2, 5000], Prime[ # ] - Prime[ # - 1] == 20 &]] (* _Stefan Steinerberger_, May 14 2006 *)

%Y Cf. A031937.

%K nonn

%O 1,1

%A _Jeff Burch_