login
Numbers whose base-8 representation has one fewer 0 than 7's.
0

%I #10 Jul 04 2021 15:52:54

%S 7,15,23,31,39,47,55,57,58,59,60,61,62,79,87,95,103,111,119,121,122,

%T 123,124,125,126,143,151,159,167,175,183,185,186,187,188,189,190,207,

%U 215,223,231,239,247,249,250,251,252,253,254,271

%N Numbers whose base-8 representation has one fewer 0 than 7's.

%t Select[Range[300],DigitCount[#,8,7]==DigitCount[#,8,0]+1&] (* _Harvey P. Dale_, Jan 22 2015 *)

%Y Cf. A007094.

%K nonn,base

%O 1,1

%A _Clark Kimberling_