login
Numbers whose base-10 representation has exactly 5 runs.
0

%I #11 Nov 20 2023 13:26:03

%S 10101,10102,10103,10104,10105,10106,10107,10108,10109,10120,10121,

%T 10123,10124,10125,10126,10127,10128,10129,10130,10131,10132,10134,

%U 10135,10136,10137,10138,10139,10140,10141,10142

%N Numbers whose base-10 representation has exactly 5 runs.

%t Select[Range[11000],Length[Split[IntegerDigits[#]]]==5&] (* _Harvey P. Dale_, Nov 20 2023 *)

%K nonn,base

%O 1,1

%A _Clark Kimberling_