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 A344044 #19 Nov 20 2022 01:56:08 %S A344044 1,28,65,371,217,1820,513,3746,2262,6076,1729,24115,2745,14364,14105, %T A344044 33537,5833,63336,8001,80507,33345,48412,13825,243490,30008,76860, %U A344044 66262,190323,27001,394940,32769,283584,112385,163324,111321,839202,54873,224028,178425,812882,74089 %N A344044 a(n) = Sum_{d|n} sigma(d)^3. %H A344044 Amiram Eldar, <a href="/A344044/b344044.txt">Table of n, a(n) for n = 1..10000</a> %F A344044 G.f.: Sum_{k >= 1} sigma(k)^3 * x^k/(1 - x^k). %F A344044 If p is prime, a(p) = 1 + (p+1)^3. %F A344044 Sum_{k=1..n} a(k) ~ c * n^4, where c = (Pi^10*zeta(3)/194400) * Product_{p prime} (1 + 2/p^2 + 2/p^3 + 1/p^5) = 1.6422194986... . - _Amiram Eldar_, Nov 20 2022 %t A344044 a[n_] := DivisorSum[n, DivisorSigma[1, #]^3 &]; Array[a, 41] (* _Amiram Eldar_, May 08 2021 *) %o A344044 (PARI) a(n) = sumdiv(n, d, sigma(d)^3); %o A344044 (PARI) my(N=66, x='x+O('x^N)); Vec(sum(k=1, N, sigma(k)^3*x^k/(1-x^k))) %Y A344044 Cf. A002117, A007429, A065018, A344043, A344047. %K A344044 nonn,mult %O A344044 1,2 %A A344044 _Seiichi Manyama_, May 08 2021