cp's OEIS Frontend

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.

A301800 Expansion of Product_{k>=1} (1 + x^k)^A000593(k).

This page as a plain text file.
%I A301800 #7 Mar 31 2018 07:01:36
%S A301800 1,1,1,5,5,11,21,29,53,86,139,211,346,524,806,1264,1866,2838,4253,
%T A301800 6306,9304,13751,20018,29142,42365,60900,87569,125326,178535,253371,
%U A301800 358974,505673,710871,996658,1391551,1938801,2693543,3730901,5154610,7106235,9767649
%N A301800 Expansion of Product_{k>=1} (1 + x^k)^A000593(k).
%H A301800 Vaclav Kotesovec, <a href="/A301800/b301800.txt">Table of n, a(n) for n = 0..1000</a>
%F A301800 a(n) ~ exp(3 * Pi^(2/3) * Zeta(3)^(1/3) * n^(2/3)/4) * Zeta(3)^(1/6) / (2^(25/24) * sqrt(3) * Pi^(1/6) * n^(2/3)).
%t A301800 nmax = 40; CoefficientList[Series[Exp[Sum[-(-1)^j * Sum[DivisorSum[k, -(-1)^# k / # &] * x^(j*k) / j, {k, 1, Floor[nmax/j] + 1}], {j, 1, nmax}]], {x, 0, nmax}], x] (* _Vaclav Kotesovec_, Mar 31 2018 *)
%Y A301800 Cf. A000593, A002131, A301798, A301799.
%K A301800 nonn
%O A301800 0,4
%A A301800 _Vaclav Kotesovec_, Mar 26 2018