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 A302448 #6 Apr 09 2018 22:33:15 %S A302448 1,1,6,21,70,210,646,1881,5446,15295,42355,115036,308312,814023, %T A302448 2123431,5471967,13949888,35194914,87952796,217803302,534794576, %U A302448 1302545064,3148316746,7554386885,18001627175,42613759083,100240372671,234371794954,544812235887 %N A302448 Expansion of Product_{k>=1} 1/(1 - x^k)^(k*(k^2+1)/2). %C A302448 Euler transform of A006003. %H A302448 M. Bernstein and N. J. A. Sloane, <a href="https://arxiv.org/abs/math/0205301">Some canonical sequences of integers</a>, Linear Alg. Applications, 226-228 (1995), 57-72; erratum 320 (2000), 210. [Link to arXiv version] %H A302448 M. Bernstein and N. J. A. Sloane, <a href="/A003633/a003633_1.pdf">Some canonical sequences of integers</a>, Linear Alg. Applications, 226-228 (1995), 57-72; erratum 320 (2000), 210. [Link to Lin. Alg. Applic. version together with omitted figures] %H A302448 N. J. A. Sloane, <a href="/transforms.txt">Transforms</a> %F A302448 G.f.: Product_{k>=1} 1/(1 - x^k)^A006003(k). %F A302448 a(n) ~ exp(5 * (3*Zeta(5))^(1/5) * n^(4/5) / 2^(8/5) + Zeta(3) * n^(2/5) / (2^(9/5) * (3*Zeta(5))^(2/5)) + Zeta'(-3)/2 + 1/24 - Zeta(3)^2 / (120 * Zeta(5))) * (3*Zeta(5))^(43/400) / (2^(57/200) * sqrt(5*A*Pi) * n^(243/400)), where A is the Glaisher-Kinkelin constant A074962. - _Vaclav Kotesovec_, Apr 08 2018 %t A302448 nmax = 28; CoefficientList[Series[Product[1/(1 - x^k)^(k (k^2 + 1)/2), {k, 1, nmax}], {x, 0, nmax}], x] %t A302448 a[n_] := a[n] = If[n == 0, 1, Sum[Sum[d^2 (d^2 + 1)/2, {d, Divisors[k]}] a[n - k], {k, 1, n}]/n]; Table[a[n], {n, 0, 28}] %Y A302448 Cf. A000294, A006003, A295179, A302447. %K A302448 nonn %O A302448 0,3 %A A302448 _Ilya Gutkovskiy_, Apr 08 2018