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 A118213 #5 Mar 30 2012 18:39:53 %S A118213 10282339,10306511,32667367,102615679,105709573,107647367,107776891, %T A118213 113265953,198471113,324580307,981466259,982322251,983075549, %U A118213 1001315129,1002340429,1004157421,1005362971,1007811719,1008125953,1099887589 %N A118213 Prime numbers p such that the reversal of all the five numbers p, p^2, p^3, p^4 and p^5 are primes. %C A118213 9835884797 is the smallest term such that the reversal of p^6 is also prime. - _Hans Havermann_, Apr 22 2006 %e A118213 p=10282339 is in the sequence because p is prime; reversal(p^k) %e A118213 for k=1,2,...,5 are respectively 93328201, 129013594627501, %e A118213 9124210088606665117801, 14286816400200203701819087111 & %e A118213 996592728588610999557150173929639411 and these five numbers %e A118213 are primes. %t A118213 Do[If[n=Prime[m];PrimeQ[FromDigits[Reverse[IntegerDigits[n]]]] && PrimeQ[FromDigits[Reverse[IntegerDigits[n^2]]]] && PrimeQ [FromDigits[Reverse[IntegerDigits[n^3]]]] && PrimeQ[FromDigits [Reverse[IntegerDigits[n^4]]]] && PrimeQ[FromDigits[Reverse [IntegerDigits[n^5]]]], Print[n]], {m, 56000000}] %Y A118213 Cf. A118212. %K A118213 base,nonn %O A118213 1,1 %A A118213 _Farideh Firoozbakht_, Apr 21 2006