This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A045910 #12 Dec 12 2015 04:18:50 %S A045910 1,2,3,4,5,6,7,8,9,22,36,44,66,88,236,244,333,488,666,999,2488,2666, %T A045910 3366,3446,4444,6999,8888,26999,28888,33999,34688,36666,44488,44666, %U A045910 55555,366999,368888,446999,448888,466688,666666,3999999,4688999,4888888,6666999,6668888,7777777,66999999,68888999,88888888,999999999 %N A045910 Numbers with digits nondecreasing and their reciprocals sum to 1/(positive integer). %C A045910 Intersection of A037264 and A009994, A214949(a(n)) = 1. - _Reinhard Zumkeller_, Aug 02 2012 %e A045910 1/3 + 1/4 + 1/6 + 1/8 + 1/8 = 1/1, so 34688 is in the sequence. %o A045910 (Haskell) %o A045910 a045910 n = a045910_list !! (n-1) %o A045910 a045910_list = [x | x <- takeWhile (<= 999999999) $ a009994_list, %o A045910 a214949 x == 1] %o A045910 -- _Reinhard Zumkeller_, Aug 02 2012 %Y A045910 Condensation (by ordering digits) and completion of A037264. %K A045910 fini,full,nonn,base %O A045910 1,2 %A A045910 _Len Smiley_