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

%I #10 Sep 10 2024 17:40:03

%S 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,

%T 70,71,72,74,75,76,77,78,79,80,82,83,84,85,86,87,88,90,91,92,93,94,95,

%U 96,99,100,101,102,103,104,105,107,108,109,110

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

%t Select[Range[120],OddQ[Length[Split[IntegerDigits[#,7]]]]&] (* _Harvey P. Dale_, Sep 10 2024 *)

%K nonn,base

%O 1,2

%A _Clark Kimberling_