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 A285243 #11 Apr 15 2017 15:39:10 %S A285243 1,1,1,1,5,5,5,5,17,26,26,26,58,94,94,94,190,298,352,352,608,896,1112, %T A285243 1112,1752,2641,3289,3559,5095,7499,9227,10307,14051,20111,25520, %U A285243 28760,38843,53467,68191,76831,102187,138283,175543,202813,263905,355220,445364 %N A285243 Expansion of Product_{k>=1} 1/(1 - k*x^(k^2))^k. %H A285243 Vaclav Kotesovec, <a href="/A285243/b285243.txt">Table of n, a(n) for n = 0..10000</a> %F A285243 a(n) ~ c * n * 2^(n/4), where %F A285243 c = 37.4093119651465404809069752821426852731608123... if mod(n,4)=0 %F A285243 c = 37.6275180026872367633343656570058911570800766... if mod(n,4)=1 %F A285243 c = 37.7650387085085950514850376086515488784106690... if mod(n,4)=2 %F A285243 c = 37.4702467422193571732026074780460498930830447... if mod(n,4)=3 %t A285243 nmax = 100; CoefficientList[Series[Product[1/(1 - k*x^(k^2))^k, {k,1,nmax}], {x,0,nmax}], x] %Y A285243 Cf. A285047, A266941, A285241, A285242, A285245. %K A285243 nonn %O A285243 0,5 %A A285243 _Vaclav Kotesovec_, Apr 15 2017