A182233 Numbers that are palindromic in bases 2 and 6.
0, 1, 3, 5, 7, 21, 129, 427, 693, 819, 3999, 4257, 4593, 28539, 66433, 85093, 148617, 151497, 153513, 180213, 425971, 1040319, 1093281, 1508381, 1632995, 1974031, 1986127, 30522135, 30643095, 208080483, 1894216583, 6662648163, 8632935681
Offset: 1
Examples
85093 base 2 = 10100110001100101 and 85093 base 6 = 1453541.
Links
- Ray Chandler, Table of n, a(n) for n = 1..70 (terms < 10^18)
Crossrefs
Programs
-
Mathematica
b1 = 2; b2 = 6; lst = {}; Do[d1 = IntegerDigits[n, b1]; d2 = IntegerDigits[n, b2]; If[d1 == Reverse[d1] && d2 == Reverse[d2], AppendTo[lst, n]], {n, 2000000}]; lst (* T. D. Noe, Apr 19 2012 *)
-
PARI
isok(n) = (d2=digits(n, 2)) && (d2==Vecrev(d2)) && (d6=digits(n, 6)) && (d6==Vecrev(d6)); \\ Michel Marcus, Oct 27 2014
Extensions
a(28)-a(33) and b-file from Ray Chandler, Oct 27 2014
Comments