A044947 Runs of odd length in the base 7 representation of n.

1, 1, 1, 1, 1, 1, 2, 0, 2, 2, 2, 2, 2, 2, 2, 0, 2, 2, 2, 2, 2, 2, 2, 0, 2, 2, 2, 2, 2, 2, 2, 0, 2, 2, 2, 2, 2, 2, 2, 0, 2, 2, 2, 2, 2, 2, 2, 0, 1, 3, 3, 3, 3, 3, 3, 1, 1, 1, 1, 1, 1, 1, 3, 3, 1, 3, 3, 3, 3, 3, 3, 3, 1, 3, 3, 3, 3, 3, 3, 3, 1, 3, 3, 3, 3, 3, 3, 3, 1, 3

Offset

1,7

Links

Table of n, a(n) for n=1..90.

Mathematica

Table[Count[Split[IntegerDigits[n, 7]], _?(OddQ[Length[#]]&)], {n, 90}] (* Harvey P. Dale, Jul 19 2018 *)

Crossrefs

Sequence in context: A296509 A089582 A044946 * A044948 A044949 A044950

Adjacent sequences: A044944 A044945 A044946 * A044948 A044949 A044950

Keyword

nonn,base

Author

Clark Kimberling

Status

approved