%I #12 May 28 2023 22:20:32
%S 512,768,2050,2051,2056,2060,2080,2096,2176,2240,2560,2816,3074,3075,
%T 3080,3084,3104,3120,3200,3264,3584,3840,8202,8203,8206,8207,8226,
%U 8227,8232,8236,8242,8243,8248,8252,8322,8323,8328
%N Numbers whose base-4 representation contains exactly four 0's and no 1's.
%H Vincenzo Librandi, <a href="/A045033/b045033.txt">Table of n, a(n) for n = 1..2000</a>
%t Select[Range[10000], DigitCount[#, 4, 0] == 4 && DigitCount[#, 4, 1] == 0 &] (* _Vincenzo Librandi_, Sep 23 2016 *)
%Y Cf. A007090.
%K nonn,base
%O 1,1
%A _Clark Kimberling_