|
%I #12 Aug 03 2021 12:47:41
%S 0,2,5,12,14,17,30,32,35,58,63,72,74,77,84,86,89,102,104,107,118,133,
%T 153,163,180,182,185,192,194,197,210,212,215,238,243,310,315,328,340,
%U 348,350,353,358,363,375,378,380,383,393,418,423,432,434,437,444,446
%N Numbers whose base-6 representation has the same number of 1's, 3's and 4's.
%t Select[Range[0,500],DigitCount[#,6,1]==DigitCount[#,6,3] == DigitCount[ #,6,4]&] (* _Harvey P. Dale_, Aug 03 2021 *)
%Y Cf. A007092.
%K nonn,base,easy
%O 1,2
%A _Olivier Gérard_
|
