|
%I #14 Sep 14 2023 07:50:24
%S 42,106,138,154,162,166,168,169,171,174,186,234,298,362,394,410,418,
%T 422,424,425,427,430,442,490,522,538,546,550,552,553,555,558,570,586,
%U 602,610,614,616,617,619,622,634,642,646,648
%N Numbers with exactly 3 2's in their base 4 expansion.
%H Seiichi Manyama, <a href="/A023716/b023716.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[ Range[ 672 ], (Count[ IntegerDigits[ #, 4 ], 2 ]==3)& ]
%t Select[Range[750],DigitCount[#,4,2]==3&] (* _Harvey P. Dale_, Dec 21 2022 *)
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|
