A043710 Numbers whose base-7 representation has an odd number of runs.

1, 2, 3, 4, 5, 6, 8, 16, 24, 32, 40, 48, 50, 51, 52, 53, 54, 55, 57, 63, 64, 66, 67, 68, 69, 70, 71, 72, 74, 75, 76, 77, 78, 79, 80, 82, 83, 84, 85, 86, 87, 88, 90, 91, 92, 93, 94, 95, 96, 99, 100, 101, 102, 103, 104, 105, 107, 108, 109, 110

Offset: 1

Author

Clark Kimberling

Keywords

• nonn
• base

Programs

Mathematica

Select[Range[120],OddQ[Length[Split[IntegerDigits[#,7]]]]&] (* Harvey P. Dale, Sep 10 2024 *)