login
A043428
Numbers having four 1's in base 8.
0
585, 4169, 4617, 4673, 4680, 4682, 4683, 4684, 4685, 4686, 4687, 4689, 4697, 4705, 4713, 4721, 4729, 4745, 4809, 4873, 4937, 5001, 5065, 5193, 5705, 6217, 6729, 7241, 7753, 8777, 12873, 16969, 21065, 25161, 29257, 32841
OFFSET
1,1
MATHEMATICA
Select[Range[33000], DigitCount[#, 8, 1]==4&] (* Harvey P. Dale, Aug 12 2017 *)
CROSSREFS
Cf. A007094.
Sequence in context: A252195 A037995 A250627 * A038486 A024380 A258331
KEYWORD
nonn,base
STATUS
approved