login
A350363
Primes whose reversal is a ninth power.
2
23888027348153, 17571893445665616311, 3627487775963728773631, 5213075488148035940813, 232364835105859429802371, 1648344985192619771689693, 6522990445513252220198849, 6771520922071318266744521, 23295376285906990980268061, 29758574646480445207299379
OFFSET
1,1
LINKS
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 *)
PROG
(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
CROSSREFS
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).
Sequence in context: A003844 A132909 A104834 * A289149 A297355 A363177
KEYWORD
nonn,base
AUTHOR
Mohammed Yaseen, Dec 27 2021
STATUS
approved