|
%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_
|
