login
A037455
a(n)=Sum{d(i)*7^i: i=0,1,...,m}, where Sum{d(i)*3^i: i=0,1,...,m} is the base 3 representation of n.
2
0, 1, 2, 7, 8, 9, 14, 15, 16, 49, 50, 51, 56, 57, 58, 63, 64, 65, 98, 99, 100, 105, 106, 107, 112, 113, 114, 343, 344, 345, 350, 351, 352, 357, 358, 359, 392, 393, 394, 399, 400, 401, 406, 407, 408, 441, 442, 443, 448, 449, 450, 455, 456, 457, 686, 687
OFFSET
0,3
LINKS
MATHEMATICA
Table[FromDigits[RealDigits[n, 3], 7], {n, 0, 100}]
(* Clark Kimberling, Aug 13 2012 *)
CROSSREFS
Sequence in context: A260581 A179772 A047354 * A020675 A317303 A045980
KEYWORD
nonn,base
EXTENSIONS
Changed offset to 0, Clark Kimberling, Aug 13 2012.
STATUS
approved