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 A371389 #41 Mar 24 2024 08:21:02 %S A371389 1,2,4,16,74,388,2756,20872,180008,1758672,18937152,221914944, %T A371389 2832193008,39039810912,575502635808,9100950684480,152818028328960, %U A371389 2717564023296000,51129136369981440,1012979833297735680,21074454817487953920,460035753479203184640 %N A371389 Expansion of e.g.f. Product_{k>=1} (1 + x^k/k)^2. %C A371389 Exponential self-convolution of A007838. %F A371389 a(n) = Sum_{k=0..n} binomial(n,k) * A007838(k) * A007838(n-k). %F A371389 a(n) ~ exp(-2*gamma) * n! * n, where gamma is the Euler-Mascheroni constant A001620. - _Vaclav Kotesovec_, Mar 24 2024 %t A371389 nmax = 21; CoefficientList[Series[Product[(1 + x^k/k)^2, {k, 1, nmax}], {x, 0, nmax}], x] Range[0, nmax]! %Y A371389 Cf. A007838, A032312, A371313. %K A371389 nonn %O A371389 0,2 %A A371389 _Ilya Gutkovskiy_, Mar 24 2024