|
| |
|
|
A061779
|
|
Primes p such that q-p = 22, where q is the next prime after p.
|
|
10
|
|
|
|
1129, 1951, 2311, 2557, 3229, 3469, 3739, 3967, 4027, 5449, 6427, 7129, 8017, 9349, 9439, 9697, 10039, 10111, 10369, 10567, 11329, 11527, 12049, 12301, 13729, 13807, 14221, 14347, 15031, 15937, 17137, 17209, 17761, 18097, 18979, 19819, 19867, 19891
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
Smaller of 2 consecutive primes with a difference of 22: primes p such that p+22 is the next prime.
|
|
|
LINKS
|
Remi Eismann, Table of n, a(n) for n = 1..10000
K. Soundararajan, Small gaps between prime numbers: the work of Goldston-Pintz-Yildirim, Bull. Amer. Math. Soc., 44 (2007), 1-18.
Index entries for primes, gaps between
|
|
|
EXAMPLE
|
1129 is a term as the next prime is 1151.
|
|
|
MATHEMATICA
|
Transpose[Select[Partition[Prime[Range[2300]], 2, 1], Last[#] - First[#] == 22 &]][[1]] (* Bruno Berselli, Apr 09 2013 *)
r = Prime@Range@2300; r[[Flatten@Position[Differences@r, 22]]] (* Hans Rudolf Widmer, Jan 21 2023 *)
|
|
|
PROG
|
(PARI) { n=0; p=2; forprime (q=3, 457043, if ((q - p)==22, write("b061779.txt", n++, " ", p)); p=q ) } \\ Harry J. Smith, Jul 27 2009
(Magma) [p: p in PrimesUpTo(20000) | NextPrime(p)-p eq 22]; // Bruno Berselli, Apr 09 2013
|
|
|
CROSSREFS
|
Sequence in context: A082888 A122384 A218041 * A218159 A325087 A261404
Adjacent sequences: A061776 A061777 A061778 * A061780 A061781 A061782
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Amarnath Murthy, May 23 2001
|
|
|
EXTENSIONS
|
Corrected and extended by Patrick De Geest, May 26 2001
Entry revised by N. J. A. Sloane, Jan 26 2007
|
|
|
STATUS
|
approved
|
| |
|
|
