|
|
A023277
|
|
Primes that remain prime through 3 iterations of function f(x) = 3x + 2.
|
|
2
|
|
|
29, 139, 1129, 1409, 2339, 2939, 3389, 4549, 7309, 10009, 10039, 11489, 12539, 13859, 15259, 17159, 17569, 20939, 22079, 24229, 24509, 27799, 28099, 29339, 30029, 32059, 33599, 34469, 37379, 37619, 39419, 41579, 42359, 44549, 52919, 55259, 57679, 58109
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Primes p such that 3*p+2, 9*p+8 and 27*p+26 are also primes. - Vincenzo Librandi, Aug 04 2010
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Prime[Range[6000]], AllTrue[Rest[NestList[3#+2&, #, 3]], PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Feb 25 2015 *)
|
|
PROG
|
(Magma) [n: n in [1..100000] | IsPrime(n) and IsPrime(3*n+2) and IsPrime(9*n+8) and IsPrime(27*n+26)] // Vincenzo Librandi, Aug 04 2010
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|