|
%I #9 Jul 05 2015 17:53:43
%S 2,3,5,11,101,111,141,151,515,525,10001,11311,11411,11511,12021,12121,
%T 13131,13531,14141,14341,15451,50105,51215,52225,52525,53035,53135,
%U 53535,54345,54445,55355,1004001,1005001,1015101,1021201,1034301,1041401,1054501,1111111,1123211,1133311
%N Palindromic primes in base 6 (written in base 6).
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/PalindromicPrime.html">Palindromic Prime</a>.
%t Select[FromDigits[IntegerDigits[#,6]]&/@Prime[Range[6*10^3]], IntegerDigits[#] == Reverse[IntegerDigits[#]]&] (* _Harvey P. Dale_, Jul 05 2015 *)
%Y Cf. A029974.
%K nonn,base
%O 1,1
%A _Martin Renner_, Apr 13 2006
|
