|
%I #13 Jun 25 2021 01:42:01
%S 0,1,2,3,4,5,8,9,10,11,12,13,14,17,18,19,20,21,22,23,26,27,28,29,30,
%T 31,32,35,36,37,38,39,40,41,44,45,46,47,48,49,50,53,61,69,72,73,74,75,
%U 76,77,80,81,82,83,84,85,86,89,90,91,92,93,94,95,98,99,100,101,102
%N Numbers whose base-9 representation has the same number of 6's and 7's.
%t Select[Range[0,120],DigitCount[#,9,6]==DigitCount[#,9,7]&] (* _Harvey P. Dale_, Jul 10 2019 *)
%Y Cf. A007095.
%K nonn,base,easy
%O 1,3
%A _Olivier Gérard_
|
