|
%I #13 Jun 25 2021 01:41:39
%S 0,1,2,3,5,7,8,9,10,11,12,14,16,17,18,19,20,21,23,25,26,27,28,29,30,
%T 32,34,35,42,45,46,47,48,50,52,53,58,63,64,65,66,68,70,71,72,73,74,75,
%U 77,79,80,81,82,83,84,86,88,89,90,91,92,93,95,97,98,99,100,101,102
%N Numbers whose base-9 representation has the same number of 4's and 6's.
%t Select[Range[0,110],DigitCount[#,9,4]==DigitCount[#,9,6]&] (* _Harvey P. Dale_, Apr 27 2018 *)
%Y Cf. A007095.
%K nonn,base,easy
%O 1,3
%A _Olivier Gérard_
|
