login
A044946
Runs of odd length in the base 6 representation of n.
0
1, 1, 1, 1, 1, 2, 0, 2, 2, 2, 2, 2, 2, 0, 2, 2, 2, 2, 2, 2, 0, 2, 2, 2, 2, 2, 2, 0, 2, 2, 2, 2, 2, 2, 0, 1, 3, 3, 3, 3, 3, 1, 1, 1, 1, 1, 1, 3, 3, 1, 3, 3, 3, 3, 3, 3, 1, 3, 3, 3, 3, 3, 3, 1, 3, 3, 3, 3, 3, 3, 1, 1, 3, 3, 3, 3, 3, 3, 1, 3, 3, 3, 3, 1, 1, 1, 1, 1, 1, 3
OFFSET
1,6
MATHEMATICA
Table[Count[Split[IntegerDigits[n, 6]], _?(OddQ[Length[#]]&)], {n, 100}] (* Harvey P. Dale, Jan 01 2021 *)
CROSSREFS
Sequence in context: A238005 A296509 A089582 * A044947 A044948 A044949
KEYWORD
nonn,base
STATUS
approved