|
| |
|
|
A062183
|
|
Numbers such that harmonic mean of digits is 5.
|
|
0
| |
|
|
5, 55, 555, 5555, 26999, 28888, 29699, 29969, 29996, 33999, 34688, 34868, 34886, 36488, 36666, 36848, 36884, 38468, 38486, 38648, 38684, 38846, 38864, 39399, 39939, 39993, 43688, 43868, 43886, 44488, 44666, 44848, 44884, 46388, 46466
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| Do[ h = IntegerDigits[n]; If[ Sort[h][[1]] != 0 && Length[h]/Apply[Plus, 1/h] == 5, Print[n]], {n, 1, 10^6}]
|
|
|
CROSSREFS
| Cf. A062179-A062185, A061383-A061388, A061423-A061425.
Sequence in context: A144894 A045640 A043040 * A002279 A119292 A139258
Adjacent sequences: A062180 A062181 A062182 * A062184 A062185 A062186
|
|
|
KEYWORD
| base,easy,nonn
|
|
|
AUTHOR
| Vladeta Jovovic (vladeta(AT)eunet.rs), Jun 12 2001
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 08 2001
|
| |
|
|
