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 A344047 #12 May 08 2021 07:41:09 %S A344047 1,10,65,2411,7777,2986058,2097153,2562893036,10604499438, %T A344047 3570467234410,743008370689,232218265092200875,793714773254145, %U A344047 21035720123170684938,504857282956046114465,727423121747187826721517,2185911559738696531969,43567528752021332763809905512,5242880000000000000000001 %N A344047 a(n) = Sum_{d|n} sigma(d)^d. %F A344047 G.f.: Sum_{k >= 1} (sigma(k) * x)^k/(1 - x^k). %F A344047 If p is prime, a(p) = 1 + (p+1)^p. %t A344047 a[n_] := DivisorSum[n, DivisorSigma[1, #]^# &]; Array[a, 19] (* _Amiram Eldar_, May 08 2021 *) %o A344047 (PARI) a(n) = sumdiv(n, d, sigma(d)^d); %o A344047 (PARI) my(N=20, x='x+O('x^N)); Vec(sum(k=1, N, (sigma(k)*x)^k/(1-x^k))) %Y A344047 Cf. A065018, A342473, A344044. %K A344047 nonn %O A344047 1,2 %A A344047 _Seiichi Manyama_, May 08 2021