|
%I #9 Jul 04 2021 18:28:05
%S 1,2,3,6,7,8,11,12,13,16,17,18,20,29,31,32,33,36,37,38,41,42,43,45,54,
%T 56,57,58,61,62,63,66,67,68,70,79,81,82,83,86,87,88,91,92,93,95,101,
%U 102,103,105,110,115,134,139,144,146,147,148
%N Numbers whose base-5 representation has the same number of 0's as 4's.
%t Select[Range[200],DigitCount[#,5,0]==DigitCount[#,5,4]&] (* _Harvey P. Dale_, May 30 2019 *)
%Y Cf. A007091.
%K nonn,base
%O 1,2
%A _Clark Kimberling_
|
