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 A027848 #35 May 04 2025 03:13:12
%S A027848 1,19,85,311,631,1615,2409,4991,6898,11989,14653,26435,28575,45771,
%T A027848 53635,79887,83539,131062,130341,196241,204765,278407,279865,424235,
%U A027848 394406,542925,558778,749199,707311,1019065,923553,1278255,1245505,1587241,1520079,2145278,1874199,2476479,2428875,3149321,2825803,3890535,3418845,4557083,4352638,5317435
%N A027848 a(n) = Sum_{ d|n } sigma(n/d)*d^4.
%H A027848 Seiichi Manyama, <a href="/A027848/b027848.txt">Table of n, a(n) for n = 1..1000</a>
%F A027848 Dirichlet g.f.: zeta(s)*zeta(s-1)*zeta(s-4). [corrected by _Michael Shamos_, May 03 2025]
%F A027848 Multiplicative with a(p^e) = (p^(4e+7) - (p^3+p^2+p+1)*p^(e+1) + p^2+p+1)/(p^7 - (p^3+p^2+p+1)*p + p^2+p+1). - _Mitch Harris_, Jun 27 2005
%F A027848 L.g.f.: -log(Product_{k>=1} (1 - x^k)^sigma_3(k)) = Sum_{n>=1} a(n)*x^n/n. - _Ilya Gutkovskiy_, May 23 2018
%F A027848 Sum_{k=1..n} a(k) ~ zeta(5) * Pi^4 * n^5 / 450. - _Vaclav Kotesovec_, Feb 16 2020, [corrected May 04 2025, according to the corrected DGF]
%t A027848 f[p_, e_] := (1 + p + p^2 - p^(e+1) - p^(e+2) - p^(e+3) - p^(e+4) + p^(4*e+7))/(1 - p^3 - p^4 + p^7); a[1] = 1; a[n_] := Times @@ f @@@ FactorInteger[n]; Array[a, 50] (* _Amiram Eldar_, Oct 03 2023 *)
%o A027848 (PARI)N=66; x='x+O('x^N); /* that many terms */
%o A027848 c=sum(j=1,N,j*x^j);
%o A027848 t=log(1/prod(j=1,N, eta(x^(j))^(j^3)));
%o A027848 Vec(serconvol(t,c)) /* show terms */
%o A027848 /* _Joerg Arndt_, May 03 2008 */
%Y A027848 Cf. A001001, A027847, A288391.
%K A027848 nonn,easy,mult
%O A027848 1,2
%A A027848 _N. J. A. Sloane_