login
A225811
Primes p such that q - p = 66, where q is the next prime after p.
1
162143, 221327, 259033, 273367, 282493, 283303, 285871, 294563, 296843, 341357, 377393, 379207, 390581, 425713, 430193, 453461, 544031, 552403, 573571, 643303, 643781, 646453, 694123, 694651, 714377, 726221, 729073, 732373, 736511, 762121, 780733, 787361, 797207
OFFSET
1,1
MATHEMATICA
Select[Prime[Range[80000]], NextPrime[#] - # == 66 &] (* T. D. Noe, Jul 30 2013 *)
Select[Partition[Prime[Range[65000]], 2, 1], #[[2]]-#[[1]]==66&][[All, 1]] (* Harvey P. Dale, Apr 09 2022 *)
CROSSREFS
Sequence in context: A204306 A120409 A253466 * A244348 A083633 A043649
KEYWORD
nonn
AUTHOR
Daniel Hipley, Jul 29 2013
STATUS
approved