A043712 Numbers whose base-9 representation has an odd number of runs.
1, 2, 3, 4, 5, 6, 7, 8, 10, 20, 30, 40, 50, 60, 70, 80, 82, 83, 84, 85, 86, 87, 88, 89, 91, 99, 100, 102, 103, 104, 105, 106, 107, 108, 109, 110, 112, 113, 114, 115, 116, 117, 118, 119, 120, 122, 123, 124, 125, 126, 127, 128, 129, 130
Offset: 1
Programs
-
Mathematica
Select[Range[200],OddQ[Length[Split[IntegerDigits[#,9]]]]&] (* Harvey P. Dale, Nov 08 2012 *)