login
A045184
Numbers whose base-5 representation contains exactly three 0's and no 2's.
0
125, 375, 500, 626, 628, 629, 630, 640, 645, 650, 700, 725, 750, 1000, 1125, 1876, 1878, 1879, 1880, 1890, 1895, 1900, 1950, 1975, 2000, 2250, 2375, 2501, 2503, 2504, 2505, 2515, 2520, 2525, 2575, 2600, 2625, 2875, 3000
OFFSET
1,1
MATHEMATICA
okQ[n_]:=Module[{dc5=DigitCount[n, 5]}, dc5[[5]]==3&&dc5[[2]]==0]
Select[Range[3000], okQ] (* Harvey P. Dale, Dec 23 2010 *)
CROSSREFS
Cf. A007091.
Sequence in context: A161855 A353502 A252057 * A059470 A316387 A250900
KEYWORD
nonn,base
STATUS
approved