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

0, 1, 2, 3, 4, 9, 10, 11, 12, 13, 18, 19, 20, 21, 22, 27, 28, 29, 30, 31, 36, 37, 38, 39, 40, 81, 82, 83, 84, 85, 90, 91, 92, 93, 94, 99, 100, 101, 102, 103, 108, 109, 110, 111, 112, 117, 118, 119, 120, 121, 162, 163, 164, 165, 166, 171, 172, 173, 174, 175

Offset

0,3

Links

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

Mathematica

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

Crossrefs

Cf. A051382.

Sequence in context: A316534 A140238 A135210 * A265746 A047454 A373788

Adjacent sequences: A037465 A037466 A037467 * A037469 A037470 A037471

Keyword

nonn,base

Author

Clark Kimberling

Extensions

Offset changed to 0 by Clark Kimberling, Aug 14 2012

Status

approved