(* _Clark Kimberling, _, Aug 14 2012 *)
(* _Clark Kimberling, _, Aug 14 2012 *)
proposed
approved
editing
proposed
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
1,2
0,3
Clark Kimberling, <a href="/A037463/b037463.txt">Table of n, a(n) for n = 0..1000</a>
Table[FromDigits[RealDigits[n, 4], 9], {n, 0, 100}]
(* Clark Kimberling, Aug 14 2012 *)
Offset changed to 0 by Clark Kimberling, Aug 14 2012
approved
editing
Clark Kimberling (ck6(AT)evansville.edu)
a(n)=SUMSum{d(i)*9^i: i=0,1,...,m}, where SUMSum{d(i)*4^i: i=0,1,...,m} is the base 4 representation of n.
nonn,base,new
nonn,base,new
Clark Kimberling, (ck6(AT)evansville.edu)
nonn,base,new
Clark Kimberling, ck6@cedar.(AT)evansville.edu
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.
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
1,2
nonn,base
Clark Kimberling, ck6@cedar.evansville.edu
approved