|
|
A244086
|
|
Primes p such that p remains prime through 7 iterations of function f(x) = 2*x + 3.
|
|
0
|
|
|
477727, 507757, 30596497, 33145687, 36180527, 61192997, 141339217, 148590307, 193394347, 297180617, 374066267, 395534747, 398001547, 419795137, 488716897
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Prime[Range[600000]], And@@PrimeQ[NestList[2 # + 3 &, #, 7]] &]
|
|
PROG
|
(Magma) [p: p in PrimesUpTo(600000000) | forall{i: i in [1..7] | IsPrime(2^i*p+3*(2^i-1))}];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Inappropriate MAGMA code simplified and other terms added from Bruno Berselli, Jun 24 2014
|
|
STATUS
|
approved
|
|
|
|