cp's OEIS Frontend

A058996 Primes whose reversal is a fourth power.

%I A058996 #6 Jun 02 2016 15:02:01
%S A058996 61,61483,123031,125329,5260051,14854831,18005983,61277761,63367741,
%T A058996 127009213,163740361,526098739,639360181,639714223,1088352997,
%U A058996 1808902273,10007631583,10278214831,14838314173,16121301661
%N A058996 Primes whose reversal is a fourth power.
%H A058996 Chai Wah Wu, <a href="/A058996/b058996.txt">Table of n, a(n) for n = 1..22582</a>
%t A058996 Do[ If[ PrimeQ[ n ] && IntegerQ[ ToExpression[ StringReverse[ ToString[ n ] ] ]^(1/4) ], Print[ n ] ], {n, 1, 10^12} ]
%o A058996 (Python)
%o A058996 from sympy import isprime
%o A058996 A058996_list = []
%o A058996 for i in range(10**6):
%o A058996     if i % 10:
%o A058996         p = int(str(i**4)[::-1])
%o A058996         if isprime(p):
%o A058996             A058996_list.append(p)
%o A058996 A058996_list = sorted(A058996_list) # _Chai Wah Wu_, Jun 02 2016
%Y A058996 Cf. A007488.
%K A058996 nonn,base
%O A058996 1,1
%A A058996 _Robert G. Wilson v_, Jan 16 2001