%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