|
%I #18 Apr 10 2021 22:19:25
%S 2,151,757,93739,7949497,112969211
%N Primes that are palindromic in bases 3 and 10.
%H P. De Geest, <a href="http://www.worldofnumbers.com/palpri.htm">World!Of Palindromic Primes</a>
%e 757_10 = 1001001_3. - _Jon E. Schoenfield_, Apr 10 2021
%t f[n_,b_]:=FromDigits[RealDigits[n,b][[1]]]==FromDigits[Reverse[RealDigits[n,b][[1]]]]; lst={};Do[p=Prime[n];If[f[p,3]&&f[p,10],AppendTo[lst,p]],{n,8!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Sep 25 2009 *)
%Y Cf. A002385, A007633.
%K nonn,hard,base
%O 1,1
%A _Patrick De Geest_, Aug 15 1998
|
