%I #12 May 27 2023 20:37:32
%S 15,31,47,55,59,61,62,95,111,119,123,125,126,159,175,183,187,189,190,
%T 215,219,221,222,231,235,237,238,245,246,249,250,351,367,375,379,381,
%U 382,415,431,439,443,445,446,471,475,477,478
%N Numbers whose base-4 representation contains no 0's and exactly two 3's.
%t Select[Range[500],DigitCount[#,4,0]==0&&DigitCount[#,4,3]==2&] (* _Harvey P. Dale_, Oct 05 2021 *)
%Y Cf. A007090.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|