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 A308381 #6 May 24 2019 13:07:54
%S A308381 1,1,2,4,16,56,256,1072,11264,119296,1075456,9088256,85292032,
%T A308381 894690304,8968964096,90882789376,2409397682176,40515889528832,
%U A308381 1051789297844224,16251803853193216,302342408330018816,4444559976664662016,84010278329827459072,1289319649553742823424
%N A308381 Expansion of e.g.f. exp(Sum_{k>=1} x^(k^2)*(2 + x^(k^2))/(2*k^2)).
%F A308381 E.g.f.: exp(Sum_{k>=1} A053866(k)*x^k/k).
%F A308381 E.g.f.: Product_{k>=1} 1/(1 - x^(2*k-1))^(lambda(2*k-1)/(2*k-1)), where lambda() is the Liouville function (A008836).
%t A308381 nmax = 23; CoefficientList[Series[Exp[Sum[x^(k^2) (2 + x^(k^2))/(2 k^2), {k, 1, nmax}]], {x, 0, nmax}], x] Range[0, nmax]!
%t A308381 nmax = 23; CoefficientList[Series[Product[1/(1 - x^(2 k - 1))^(LiouvilleLambda[2 k - 1]/(2 k - 1)), {k, 1, nmax}], {x, 0, nmax}], x] Range[0, nmax]!
%Y A308381 Cf. A008836, A053866, A205801, A306831.
%K A308381 nonn
%O A308381 0,3
%A A308381 _Ilya Gutkovskiy_, May 23 2019