|
%I #13 Aug 04 2023 10:12:57
%S 62,74,78,107,143,155,159,179,185,187,197,209,213,221,223,227,231,235,
%T 237,296,314,320,322,350,386,398,402,422,428,430,440,452,456,464,466,
%U 470,474,478,480,530,536,538,554,556,562,584
%N Numbers whose base-3 representation contains exactly one 0 and three 2's.
%H Paolo Xausa, <a href="/A044997/b044997.txt">Table of n, a(n) for n = 1..10000</a>
%t A044997list[upto_]:=Select[Range[upto],DigitCount[#,3,0]==1&&DigitCount[#,3,2]==3&];A044997list[1000] (* _Paolo Xausa_, Aug 04 2023 *)
%Y Cf. A007089.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
