

A037472


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


1



0, 1, 2, 3, 4, 5, 9, 10, 11, 12, 13, 14, 18, 19, 20, 21, 22, 23, 27, 28, 29, 30, 31, 32, 36, 37, 38, 39, 40, 41, 45, 46, 47, 48, 49, 50, 81, 82, 83, 84, 85, 86, 90, 91, 92, 93, 94, 95, 99, 100, 101, 102, 103, 104, 108, 109, 110, 111, 112, 113, 117, 118, 119
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,3


LINKS

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


MATHEMATICA

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


CROSSREFS

Sequence in context: A098464 A068586 A068585 * A096304 A119955 A158573
Adjacent sequences: A037469 A037470 A037471 * A037473 A037474 A037475


KEYWORD

nonn,base


AUTHOR

Clark Kimberling


EXTENSIONS

Offset changed to 0 by Clark Kimberling, Aug 14 2012


STATUS

approved



