A044939 Number of runs of even length in base-8 representation of n.

0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0

Offset

1,1

Comments

There are only seven terms greater than 1 in the first 1000 terms of the sequence, and the largest term in the first 10000 terms is 2. - Harvey P. Dale, Jun 02 2024

Links

Harvey P. Dale, Table of n, a(n) for n = 1..10000

Mathematica

Array[Total[Boole[EvenQ[Length/@Split[IntegerDigits[#, 8]]]]]&, 100] (* Harvey P. Dale, Jun 02 2024 *)

Crossrefs

Sequence in context: A353639 A353569 A353477 * A373973 A371084 A353626

Adjacent sequences: A044936 A044937 A044938 * A044940 A044941 A044942

Keyword

nonn,base

Author

Clark Kimberling

Status

approved