%I #26 Oct 28 2014 11:16:31
%S 0,1,3,31,93,119,2709,38937,520831,682341,340134981,7609865031,
%T 17935304097,26777829859,169179279801,567897922593,286118927218753,
%U 2996750083037781,4738749440161121,6299497017331917,8829547069230943
%N Numbers that are palindromic in bases 2 and 5.
%C Intersection of A006995 and A029952. - _Michel Marcus_, Oct 08 2014
%H Ray Chandler, <a href="/A182232/b182232.txt">Table of n, a(n) for n = 1..25</a>
%e 2709 base 2 = 101010010101 and 2709 base 5 = 41314.
%t b1 = 2; b2 = 5; lst = {}; Do[d1 = IntegerDigits[n, b1]; d2 = IntegerDigits[n, b2]; If[d1 == Reverse[d1] && d2 == Reverse[d2], AppendTo[lst, n]], {n, 1000000}]; lst (* _T. D. Noe_, Apr 19 2012 *)
%Y Cf. A060792, A097856.
%K nonn,base
%O 1,3
%A _Alex Ratushnyak_, Apr 19 2012
%E Term 0 prepended by _Robert G. Wilson v_, Oct 08 2014
%E a(12)-a(16) from _Robert G. Wilson v_, Oct 11 2014
%E a(17)-a(21) and b-file from _Ray Chandler_, Oct 24 2014
|