A045161 Numbers whose base-5 representation contains exactly one 0 and no 1's.
0, 10, 15, 20, 52, 53, 54, 60, 65, 70, 77, 78, 79, 85, 90, 95, 102, 103, 104, 110, 115, 120, 262, 263, 264, 267, 268, 269, 272, 273, 274, 302, 303, 304, 310, 315, 320, 327, 328, 329, 335, 340, 345, 352, 353, 354, 360, 365, 370, 387
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..7798
Crossrefs
Cf. A007091.
Programs
-
Mathematica
Select[Range[0, 400], DigitCount[#, 5, 0]==1 && DigitCount[#, 5, 1]==0 &] (* Vincenzo Librandi, Jun 29 2019 *)
Extensions
a(1) = 0 inserted by Georg Fischer, Jun 28 2019