A059000 Primes whose reversal is a fifth power.

23, 4201, 102658511, 344800741, 39715342481, 70496383033, 869910021839, 998699567381, 3457914828521, 3487946075153, 5265190686031, 5786421085169, 7020715917491, 9432574158041, 9925883645611, 9987727089187, 23802566907811, 23888027348153, 34401855516071

Offset: 1

Author

Robert G. Wilson v, Jan 16 2001

Keywords

• nonn
• base

Links

• Chai Wah Wu, Table of n, a(n) for n = 1..18022

Crossrefs

Cf. A007488.

Programs

Mathematica

Do[ If[ PrimeQ[ n ] && IntegerQ[ ToExpression[ StringReverse[ ToString[ n ] ] ]^(1/5) ], Print[ n ] ], {n, 1, 10^16} ]

Python

from sympy import isprime
A059000_list = []
for i in range(10**6):
    if i % 10:
        p = int(str(i**5)[::-1])
        if isprime(p):
            A059000_list.append(p)
A059000_list = sorted(A059000_list) # Chai Wah Wu, Dec 20 2015, Jun 02 2016

Extensions

More terms from Sean A. Irvine, Sep 09 2022