A204670 Primes p such that q-p = 64, where q is the next prime after p.

89689, 107377, 288583, 367957, 381103, 400759, 445363, 623107, 625699, 637003, 710713, 725209, 779413, 801883, 803749, 821677, 832519, 844777, 883807, 912103, 919447, 954763, 981823, 997813, 1003963, 1059349, 1066447, 1070689, 1072039, 1100683, 1148773, 1162129, 1163353, 1251463

Offset

1,1

Links

M. F. Hasler, Table of n, a(n) for n = 1..8823 (all a(n)<10^8).

Index entries for primes, gaps between

Mathematica

Transpose[Select[Partition[Prime[Range[100000]], 2, 1], Last[#]-First[#] == 64&]][[1]] (* Harvey P. Dale, Nov 25 2012 *)

Prog

(PARI) c=o=0; forprime(p=1, default(primelimit), (-o+o=p)==64&write("c:/temp/b204670.txt", c++" "p-64)) \\ M. F. Hasler, Jan 18 2012

Crossrefs

Sequence in context: A205290 A205898 A250452 * A353550 A359291 A236908

Adjacent sequences: A204667 A204668 A204669 * A204671 A204672 A204673

Keyword

nonn

Author

N. J. A. Sloane, Jan 17 2012

Status

approved