This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A059005 #15 Dec 22 2024 20:13:16
%S A059005 4201,940315563074788471,940291214439736193431,948413222299837654933,
%T A059005 1081016161371207738841,4243031147170261950811,
%U A059005 428799714836577410775151,671856480838442730716731,1049138260426397606038531,4224428884713520708904251,9425086013565224928896521
%N A059005 Primes whose reversal is a tenth power.
%H A059005 Robert Israel, <a href="/A059005/b059005.txt">Table of n, a(n) for n = 1..9149</a>
%p A059005 rev:= proc(n) local L, i;
%p A059005 L:= convert(n, base, 10);
%p A059005 add(L[-i]*10^(i-1), i=1..nops(L))
%p A059005 end proc:
%p A059005 S:= {}:
%p A059005 for i from 1 to 999 do
%p A059005 if i mod 10 = 0 then next fi;
%p A059005 p:= rev(i^10);
%p A059005 if isprime(p) then S:= S union {p} fi;
%p A059005 od:
%p A059005 sort(convert(S, list)); # _Robert Israel_, Dec 22 2024
%t A059005 Union[Select[FromDigits[Reverse[IntegerDigits[#]]]&/@(Range[300]^10),PrimeQ]] (* _Harvey P. Dale_, Mar 19 2013 *)
%Y A059005 Cf. A007488.
%K A059005 nonn,base
%O A059005 1,1
%A A059005 _Robert G. Wilson v_, Jan 16 2001
%E A059005 More terms from _Sean A. Irvine_, Sep 09 2022