|
%I #10 May 19 2023 19:53:39
%S 426,618,666,678,681,1194,1578,1674,1698,1704,1707,1710,1722,1770,
%T 1962,2154,2202,2214,2217,2346,2442,2466,2472,2475,2478,2490,2538,
%U 2586,2598,2601,2634,2658,2664,2667,2670,2682,2694
%N Numbers whose base-4 representation contains exactly one 1 and four 2's.
%t Select[Range[3000],DigitCount[#,4,1]==1&&DigitCount[#,4,2]==4&] (* _Harvey P. Dale_, Jun 07 2019 *)
%Y Cf. A007090.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
