login
Numbers whose base-8 representation has exactly 2 runs.
0

%I #11 Apr 25 2021 01:27:11

%S 8,10,11,12,13,14,15,16,17,19,20,21,22,23,24,25,26,28,29,30,31,32,33,

%T 34,35,37,38,39,40,41,42,43,44,46,47,48,49,50,51,52,53,55,56,57,58,59,

%U 60,61,62,64,72,74,75,76,77,78,79,82,91,100,109,118,127,128

%N Numbers whose base-8 representation has exactly 2 runs.

%t Select[Range[100],Length[Split[IntegerDigits[#,8]]]==2&] (* _Harvey P. Dale_, Oct 07 2017 *)

%Y Cf. A007094.

%K nonn,base

%O 1,1

%A _Clark Kimberling_

%E More terms from _Harvey P. Dale_, Oct 07 2017