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 A059703 #10 Sep 08 2022 08:45:03 %S A059703 2,53,103,113,131,257,317,409,787,1283,1429,1657,2087,2089,2687,2833, %T A059703 3089,3191,3329,3359,3889,4093,4159,4513,4999,5153,5683,5737,6089, %U A059703 6317,6421,6571,6679,6691,7933,8971,8999,9103,9743,10247,10303,11213,11239 %N A059703 Primes p such that p^10 reversed is also prime. %H A059703 Vincenzo Librandi, <a href="/A059703/b059703.txt">Table of n, a(n) for n = 1..1000</a> %t A059703 Select[ Range[ 17000 ], PrimeQ[ # ] && PrimeQ[ ToExpression[ StringReverse[ ToString[ #^10 ] ] ] ] & ] %t A059703 Select[Prime[Range[1500]],PrimeQ[IntegerReverse[#^10]]&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jul 25 2019 *) %o A059703 (Magma) [p: p in PrimesUpTo(15000)|IsPrime(Seqint(Reverse(Intseq(p^10))))]; // _Vincenzo Librandi_, Apr 12 2013 %Y A059703 Cf. A059211. %K A059703 base,nonn %O A059703 1,1 %A A059703 _Robert G. Wilson v_, Feb 06 2001