A037463 a(n)=Sum{d(i)*9^i: i=0,1,...,m}, where Sum{d(i)*4^i: i=0,1,...,m} is the base 4 representation of n.

0, 1, 2, 3, 9, 10, 11, 12, 18, 19, 20, 21, 27, 28, 29, 30, 81, 82, 83, 84, 90, 91, 92, 93, 99, 100, 101, 102, 108, 109, 110, 111, 162, 163, 164, 165, 171, 172, 173, 174, 180, 181, 182, 183, 189, 190, 191, 192, 243, 244, 245, 246, 252, 253, 254, 255, 261

Offset

0,3

Links

Clark Kimberling, Table of n, a(n) for n = 0..1000

Mathematica

Table[FromDigits[RealDigits[n, 4], 9], {n, 0, 100}]
(* Clark Kimberling, Aug 14 2012 *)

Crossrefs

Sequence in context: A235499 A242590 A135204 * A309348 A270886 A133557

Adjacent sequences: A037460 A037461 A037462 * A037464 A037465 A037466

Keyword

nonn,base

Author

Clark Kimberling

Extensions

Offset changed to 0 by Clark Kimberling, Aug 14 2012

Status

approved