A259390 Palindromic numbers in bases 7 and 9 written in base 10.
0, 1, 2, 3, 4, 5, 6, 8, 40, 50, 100, 164, 200, 264, 300, 328, 400, 2000, 3550, 8200, 10252, 14510, 14762, 22800, 45600, 164900, 201720, 400200, 532900, 555013, 738100, 2756120, 2913368, 3344352, 3501600, 4084000, 12990350, 22674550, 194062432, 1684866370, 2225211080, 13575144288, 15127811455, 20404027400, 20537111057, 22668403353, 30862471355, 83714515310, 84668107250, 796259955485, 1202029647736, 2088800185930, 20268849562000
Offset: 1
Examples
264 is in the sequence because 264_10 = 323_9 = 525_7.
Links
Crossrefs
Programs
-
Mathematica
(* first load nthPalindromeBase from A002113 *) palQ[n_Integer, base_Integer] := Block[{}, Reverse[ idn = IntegerDigits[n, base]] == idn]; k = 0; lst = {}; While[k < 21000000, pp = nthPalindromeBase[k, 9]; If[palQ[pp, 7], AppendTo[lst, pp]; Print[pp]]; k++]; lst