%I A135067
%S A135067 8,343,1331,1030301
%N A135067 Palindromic cubes p^3, where p is a prime.
%C A135067 Corresponding primes p such that a(n) = p^3 are listed in A135066 = {2, 
               7, 11, 101, ...} = Primes p such that p^3 is a palindrome. PrimePi[ 
               a(n)^(1/3) ] = {1, 4, 5, 26, ...}.
%H A135067 P. De Geest, <a href="http://www.worldofnumbers.com/cube.htm">Palindromic 
               Cubes</a>
%F A135067 a(n) = A135066(n)^3.
%e A135067 a(3) = 1331 because 11^3 = 1331 is a palindrome and 11 is a prime.
%t A135067 Do[ p = Prime[n]; f = p^3; If[ f == FromDigits[ Reverse[ IntegerDigits[ 
               f ] ] ], Print[ {n, p, f} ]], {n, 1, 200000} ]
%Y A135067 Cf. A002780 = Cube is a palindrome. Cf. A069748 = Numbers n such that 
               n and n^3 are both palindromes. Cf. A002781 = Palindromic cubes. 
               Cf. A135066 = Primes p such that p^3 is a palindrome.
%Y A135067 Sequence in context: A071306 A117082 A061458 this_sequence A002781 A016875 
               A046244
%Y A135067 Adjacent sequences: A135064 A135065 A135066 this_sequence A135068 A135069 
               A135070
%K A135067 more,nonn,base
%O A135067 1,1
%A A135067 Alexander Adamchuk (alex(AT)kolmogorov.com), Nov 16 2007