|
%I #11 Apr 25 2021 01:25:38
%S 47989,47990,47991,47992,47993,48000,48001,48003,48004,48005,48006,
%T 48007,48008,48010,48011,48012,48013,48014,48015,48017,48018,48019,
%U 48020,48021,48022,48025,48026,48027,48028,48029
%N Numbers whose base-6 representation has exactly 7 runs.
%t Select[Range[46656,50000],Length[Split[IntegerDigits[#,6]]]==7&] (* _Harvey P. Dale_, Oct 15 2016 *)
%Y Cf. A007092.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
