|
%I #14 May 19 2019 13:33:13
%S 0,1,3,5,6,7,8,9,10,12,14,15,16,17,22,27,28,30,32,33,34,35,38,45,46,
%T 48,50,51,52,53,54,55,57,59,60,61,62,63,64,66,68,69,70,71,72,73,75,77,
%U 78,79,80,81,82,84,86,87,88,89,90,91,93,95,96,97,98,103,108,109,111
%N Numbers whose base-9 representation has the same number of 2's and 4's.
%t Select[Range[125],DigitCount[#,9,2]==DigitCount[#,9,4]&] (* _Harvey P. Dale_, Jan 23 2011 *)
%Y Cf. A007095.
%K nonn,base,easy
%O 1,3
%A _Olivier Gérard_
|
