%I #20 May 21 2023 11:03:44
%S 0,10,15,20,52,53,54,60,65,70,77,78,79,85,90,95,102,103,104,110,115,
%T 120,262,263,264,267,268,269,272,273,274,302,303,304,310,315,320,327,
%U 328,329,335,340,345,352,353,354,360,365,370,387
%N Numbers whose base-5 representation contains exactly one 0 and no 1's.
%H Vincenzo Librandi, <a href="/A045161/b045161.txt">Table of n, a(n) for n = 1..7798</a>
%t Select[Range[0, 400], DigitCount[#, 5, 0]==1 && DigitCount[#, 5, 1]==0 &] (* _Vincenzo Librandi_, Jun 29 2019 *)
%Y Cf. A007091.
%K nonn,base
%O 1,2
%A _Clark Kimberling_
%E a(1) = 0 inserted by _Georg Fischer_, Jun 28 2019
|