|
|
A045910
|
|
Numbers with digits nondecreasing and their reciprocals sum to 1/(positive integer).
|
|
2
|
|
|
1, 2, 3, 4, 5, 6, 7, 8, 9, 22, 36, 44, 66, 88, 236, 244, 333, 488, 666, 999, 2488, 2666, 3366, 3446, 4444, 6999, 8888, 26999, 28888, 33999, 34688, 36666, 44488, 44666, 55555, 366999, 368888, 446999, 448888, 466688, 666666, 3999999, 4688999, 4888888, 6666999, 6668888, 7777777, 66999999, 68888999, 88888888, 999999999
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
1/3 + 1/4 + 1/6 + 1/8 + 1/8 = 1/1, so 34688 is in the sequence.
|
|
PROG
|
(Haskell)
a045910 n = a045910_list !! (n-1)
a045910_list = [x | x <- takeWhile (<= 999999999) $ a009994_list,
a214949 x == 1]
|
|
CROSSREFS
|
Condensation (by ordering digits) and completion of A037264.
|
|
KEYWORD
|
fini,full,nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|