A058996 Primes whose reversal is a fourth power.

61, 61483, 123031, 125329, 5260051, 14854831, 18005983, 61277761, 63367741, 127009213, 163740361, 526098739, 639360181, 639714223, 1088352997, 1808902273, 10007631583, 10278214831, 14838314173, 16121301661

Offset

1,1

Links

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

Mathematica

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

Prog

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

Crossrefs

Cf. A007488.

Sequence in context: A057998 A182384 A235008 * A116124 A068533 A093631

Adjacent sequences: A058993 A058994 A058995 * A058997 A058998 A058999

Keyword

nonn,base

Author

Robert G. Wilson v, Jan 16 2001

Status

approved