%I #15 Sep 09 2022 23:37:03

%S 23,4201,102658511,344800741,39715342481,70496383033,869910021839,

%T 998699567381,3457914828521,3487946075153,5265190686031,5786421085169,

%U 7020715917491,9432574158041,9925883645611,9987727089187,23802566907811,23888027348153,34401855516071

%N Primes whose reversal is a fifth power.

%H Chai Wah Wu, <a href="/A059000/b059000.txt">Table of n, a(n) for n = 1..18022</a>

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

%o (Python)

%o from sympy import isprime

%o A059000_list = []

%o for i in range(10**6):

%o if i % 10:

%o p = int(str(i**5)[::-1])

%o if isprime(p):

%o A059000_list.append(p)

%o A059000_list = sorted(A059000_list) # _Chai Wah Wu_, Dec 20 2015, Jun 02 2016

%Y Cf. A007488.

%K nonn,base

%O 1,1

%A _Robert G. Wilson v_, Jan 16 2001

%E More terms from _Sean A. Irvine_, Sep 09 2022