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 A134672 #7 Jun 28 2019 10:52:03 %S A134672 1,3,5,9,13,31,37,57,65,135,181,277,361,759,857,1317,1681,2611,5041, %T A134672 10221,15161,25383,27721,55765,110893,166683,277265,333405,554401, %U A134672 666283,720721,1442757,2162345,3605283,4324369,7210057,8648641,10815843,21621965,36766989 %N A134672 Inverse Mobius transform of the superabundant numbers, A051731 * A004394. %H A134672 Amiram Eldar, <a href="/A134672/b134672.txt">Table of n, a(n) for n = 1..1000</a> %F A134672 Inverse Mobius transform of A004394 %e A134672 a(4) = 9 = (1, 1, 0, 1) dot (1, 2, 4, 6) = (1 + 2 + 0 + 6), where (1, 1, 0, 1) = row four of A051731. %t A134672 sa={}; rm=0; Do[r=DivisorSigma[1,n]/n; If[r>rm, rm=r;AppendTo[sa, n]], {n, 1, 120000}]; s={}; Do[AppendTo[s, DivisorSum[j, sa[[#]]&]], {j, 1, Length[sa]}]; s (* _Amiram Eldar_, Jun 28 2019 *) %Y A134672 Cf. A004394, A051731. %K A134672 nonn %O A134672 1,2 %A A134672 _Gary W. Adamson_, Nov 05 2007 %E A134672 More terms from _Amiram Eldar_, Jun 28 2019