A350363 Primes whose reversal is a ninth power.

23888027348153, 17571893445665616311, 3627487775963728773631, 5213075488148035940813, 232364835105859429802371, 1648344985192619771689693, 6522990445513252220198849, 6771520922071318266744521, 23295376285906990980268061, 29758574646480445207299379

Offset: 1

Author

Mohammed Yaseen, Dec 27 2021

Keywords

• nonn
• base

Links

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

Crossrefs

Cf. A002239, A004086, A059210.

Primes whose reversal is a k-th power: A007488 (k=2), A057699 (k=3), A058996 (k=4), A059000 (k=5), A059001 (k=6), A059002 (k=7), A059003 (k=8), A059005 (k=10).

Programs

Mathematica

Union[(i=IntegerReverse)@Select[Range@1000^9,PrimeQ@i@#&]] (* Giorgos Kalogeropoulos, Jan 04 2022 *)
Select[IntegerReverse/@(Range[1000]^9),PrimeQ]//Union (* Harvey P. Dale, Nov 27 2024 *)

PARI

flip(n)=fromdigits(Vecrev(digits(n))) \\ A004086
Set(select(isprime, vector(1000, n, flip(n^9)))) \\ adapted from A057699

Python

from sympy import isprime
flip9 = (int(str(k**9)[::-1]) for k in range(1, 1000) if k%10)
print(sorted(filter(isprime, flip9))) # Michael S. Branicky, Jan 02 2022