login
Numbers whose base-6 representation has one more 0 than 5's.
0

%I #10 Feb 13 2023 14:49:21

%S 6,12,18,24,37,38,39,40,42,48,54,60,73,74,75,76,78,84,90,96,109,110,

%T 111,112,114,120,126,132,145,146,147,148,150,156,162,168,180,221,223,

%U 224,225,226,229,230,231,232,235,236,237,238,241

%N Numbers whose base-6 representation has one more 0 than 5's.

%t Select[Range[250],DigitCount[#,6,0]-1==DigitCount[#,6,5]&] (* _Harvey P. Dale_, Feb 13 2023 *)

%Y Cf. A007092.

%K nonn,base

%O 1,1

%A _Clark Kimberling_