login
A059700
Primes p such that p^7 reversed is also prime.
1
2, 29, 41, 71, 79, 151, 193, 257, 359, 379, 389, 607, 739, 773, 1019, 1049, 1217, 1409, 1427, 1481, 1667, 1997, 2297, 2551, 2593, 3181, 3253, 3701, 3821, 3851, 3967, 4003, 4421, 5107, 5209, 5231, 5381, 5441, 5503, 6173, 6203, 6221, 6229, 6271, 7433, 7603
OFFSET
1,1
LINKS
MATHEMATICA
Select[ Range[ 10000 ], PrimeQ[ # ] && PrimeQ[ ToExpression[ StringReverse[ ToString[ #^7 ] ] ] ] & ]
PROG
(Magma) [p: p in PrimesUpTo(8000) | IsPrime(Seqint(Reverse(Intseq(p^7))))]; // _Vincenzo Librandi: Apr 12 2013
CROSSREFS
Cf. A059208.
Sequence in context: A285688 A139833 A260792 * A078329 A340633 A252892
KEYWORD
nonn,base
AUTHOR
Robert G. Wilson v, Feb 06 2001
STATUS
approved