A023323 Primes that remain prime through 4 iterations of function f(x) = 8x + 9.

2293, 5653, 11503, 76003, 88813, 100613, 142993, 294793, 314983, 351383, 419603, 463633, 473293, 520363, 682063, 694523, 780733, 836873, 872393, 895003, 1004063, 1043723, 1085473, 1277593, 1290293, 1318783, 1336463, 1446043, 1483633, 1539773

Offset

1,1

Comments

Primes p such that 8*p+9, 64*p+81, 512*p+657 and 4096*p+5265 are also primes. - Vincenzo Librandi, Aug 04 2010

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

Select[Prime[Range[120000]], AllTrue[Rest[NestList[8#+9&, #, 4]], PrimeQ]&] (* Harvey P. Dale, Jan 15 2016 *)

Prog

(Magma) [n: n in [1..5000000] | IsPrime(n) and IsPrime(8*n+9) and IsPrime(64*n+81) and IsPrime(512*n+657) and IsPrime(4096*n+5265)] // Vincenzo Librandi, Aug 04 2010

Crossrefs

Sequence in context: A020404 A180454 A216899 * A163513 A349085 A274359

Adjacent sequences: A023320 A023321 A023322 * A023324 A023325 A023326

Keyword

nonn

Author

David W. Wilson

Status

approved