|
%I #10 May 14 2023 14:23:04
%S 5,7,8,9,10,11,13,14,15,16,17,19,20,21,22,23,25,30,32,33,34,37,43,49,
%T 50,56,60,61,63,64,68,74,75,81,87,90,91,92,94,99,100,106,112,118,120,
%U 121,122,123,125,130,132,133,134,135,136,138,139
%N Numbers whose base-5 representation has an even number of runs.
%t Select[Range[150],EvenQ[Length[Split[IntegerDigits[#,5]]]]&] (* _Harvey P. Dale_, May 14 2023 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
