|
%I #15 May 28 2023 22:19:31
%S 4,18,19,24,28,33,36,49,52,74,75,78,79,98,99,104,108,114,115,120,124,
%T 134,135,137,141,146,147,152,156,161,164,177,180,198,199,201,205,210,
%U 211,216,220,225,228,241,244,298,299,302,303
%N Numbers whose base-4 representation contains exactly one 0 and one 1.
%t Select[Range[350],DigitCount[#,4,0]==DigitCount[#,4,1]==1&] (* _Harvey P. Dale_, Jun 15 2011 *)
%Y Cf. A007090.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
