|
| |
|
|
A078946
|
|
Primes p such that p, p+2, p+6, p+12 and p+14 are consecutive primes.
|
|
31
|
|
|
|
17, 227, 1277, 1607, 3527, 3917, 4637, 4787, 27737, 38447, 39227, 44267, 71327, 97367, 99707, 113147, 122027, 122387, 124337, 165707, 183497, 187127, 191447, 197957, 198827, 275447, 290657, 312197, 317957, 347057, 349397, 416387, 418337
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
Subsequence of A078847. - R. J. Mathar, Feb 10 2013
|
|
|
LINKS
|
T. D. Noe, Table of n, a(n) for n = 1..1000
Eric Weisstein's World of Mathematics, Prime Triplet.
|
|
|
EXAMPLE
|
227 is in the sequence since 227, 229, 233, 239 and 241 are consecutive primes.
|
|
|
MATHEMATICA
|
Rest@ Select[Prime@ Range@ 36000, AllTrue[{2, 6, 12, 14} + #, PrimeQ] &] (* Michael De Vlieger, Apr 18 2015, Version 10 *)
|
|
|
PROG
|
(PARI) isok(p) = isprime(p) && (nextprime(p+1)==p+2) && (nextprime(p+3)== p+6) && (nextprime(p+7)==p+12) && (nextprime(p+13)==p+14); \\ Michel Marcus, Dec 10 2013
(MAGMA) [p: p in PrimesInInterval(7, 1000000) | forall{i: i in [2, 6, 12, 14] | IsPrime(p+i)}]; // Vincenzo Librandi, Apr 19 2015
|
|
|
CROSSREFS
|
Subsequence of A128468.
Cf. A001223, A078866, A078867, A078947-A078971, A022006, A022007.
Sequence in context: A296999 A140842 A087608 * A164600 A187636 A152588
Adjacent sequences: A078943 A078944 A078945 * A078947 A078948 A078949
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Labos Elemer, Dec 19 2002
|
|
|
EXTENSIONS
|
Edited by Dean Hickerson, Dec 20 2002
|
|
|
STATUS
|
approved
|
| |
|
|
