A037467 Sum{d(i)*8^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, 8, 9, 10, 11, 12, 16, 17, 18, 19, 20, 24, 25, 26, 27, 28, 32, 33, 34, 35, 36, 64, 65, 66, 67, 68, 72, 73, 74, 75, 76, 80, 81, 82, 83, 84, 88, 89, 90, 91, 92, 96, 97, 98, 99, 100, 128, 129, 130, 131, 132, 136, 137, 138, 139, 140, 144, 145, 146

Offset

0,3

Links

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

Mathematica

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

Crossrefs

Sequence in context: A066338 A370662 A047453 * A165564 A326704 A309314

Adjacent sequences: A037464 A037465 A037466 * A037468 A037469 A037470

Keyword

nonn,base

Author

Clark Kimberling

Extensions

Offset changed to 0 by Clark Kimberling, Aug 14 2012

Status

approved