A031927 Upper prime of a difference of 8 between consecutive primes.

97, 367, 397, 409, 457, 487, 499, 691, 709, 727, 751, 769, 919, 937, 991, 1117, 1171, 1201, 1381, 1447, 1531, 1567, 1579, 1741, 1831, 1987, 2011, 2161, 2221, 2251, 2281, 2467, 2539, 2617, 2671, 2707, 2749, 2851, 2887, 2917, 3019, 3049

Offset

0,1

Links

Harvey P. Dale, Table of n, a(n) for n = 0..1000

Index entries for primes, gaps between

Maple

for i from 1 to 440 do if ithprime(i+1) = ithprime(i) + 8 then print({ithprime(i+1)}); fi; od; # Zerinvary Lajos, Mar 19 2007

Mathematica

Select[Partition[Prime[Range[500]], 2, 1], #[[2]]-#[[1]]==8&][[All, 2]] (* Harvey P. Dale, Aug 28 2017 *)

Crossrefs

Sequence in context: A269786 A366352 A105128 * A174338 A050666 A160440

Adjacent sequences: A031924 A031925 A031926 * A031928 A031929 A031930

Keyword

nonn

Author

Jeff Burch

Status

approved