[go: up one dir, main page]

login
A058996
Primes whose reversal is a fourth power.
5
61, 61483, 123031, 125329, 5260051, 14854831, 18005983, 61277761, 63367741, 127009213, 163740361, 526098739, 639360181, 639714223, 1088352997, 1808902273, 10007631583, 10278214831, 14838314173, 16121301661
OFFSET
1,1
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
KEYWORD
nonn,base
AUTHOR
Robert G. Wilson v, Jan 16 2001
STATUS
approved