%I #19 Feb 01 2024 18:38:25
%S 3,6,10,11,12,15,19,20,21,24,31,32,34,35,37,38,39,42,46,47,48,51,58,
%T 59,61,62,64,65,66,69,73,74,75,78,94,95,97,98,103,104,106,107,112,113,
%U 115,116,118,119,120,123,127,128,129,132,139,140
%N Numbers having one 0 in base 3.
%H Harvey P. Dale, <a href="/A043321/b043321.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[200],DigitCount[#,3,0]==1&] (* _Harvey P. Dale_, Feb 01 2024 *)
%Y Cf. A007089.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|