%I #14 May 21 2023 12:25:17
%S 5503,5599,5623,5629,5983,6007,6013,6103,6109,6133,7519,7543,7549,
%T 7639,7645,7669,8023,8029,8053,8149,13663,13687,13693,13783,13789,
%U 13813,14167,14173,14197,14293,15703,15709,15733,15829
%N Numbers whose base-4 representation contains exactly four 1's and three 3's.
%t Select[Range[16000],DigitCount[#,4,1]==4&&DigitCount[#,4,3]==3&] (* _Harvey P. Dale_, May 25 2013 *)
%Y Cf. A007090.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|