%I A029973
%S A029973 2,3,31,41,67,83,109,701,911,1091,1171,1277,1327,1667,1847,2083,
%T A029973 2213,2293,2423,2473,2579,2659,2789,2969,3049,16001,16651,19531,
%U A029973 20431,21481,23311,23561,24611,25391,26041,27091,28921,30871,31121
%N A029973 Palindromic primes in base 5.
%H A029973 P. De Geest, <a href="http://www.worldofnumbers.com/palpri.htm">World!Of 
               Palindromic Primes</a>
%t A029973 f[n_]:=FromDigits[RealDigits[n,5][[1]]]==FromDigits[Reverse[RealDigits[n,
               5][[1]]]]; lst={}; Do[p=Prime[n]; If[f[p],AppendTo[lst,p]],{n,8!}]; 
               lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Aug 10 2009]
%Y A029973 Sequence in context: A155056 A110456 A128348 this_sequence A054551 A049065 
               A128030
%Y A029973 Adjacent sequences: A029970 A029971 A029972 this_sequence A029974 A029975 
               A029976
%K A029973 nonn,base
%O A029973 1,1
%A A029973 Patrick De Geest (pdg(AT)worldofnumbers.com)