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 A372624 #9 May 08 2024 08:52:37 %S A372624 0,0,1,0,-5,-10,16,154,365,-750,-9749,-35222,20956,1013220,6007821, %T A372624 10272092,-129948837,-1405396426,-6318145964,7407235766,371429230721, %U A372624 3172609248526,11070816858267,-73488239926510,-1500342260080360,-11917913896465720,-31231507292803479 %N A372624 Expansion of e.g.f. exp(1 - exp(x)) * (exp(x) - 1)^2 / 2. %F A372624 a(n) = Sum_{k=0..n} (-1)^k * Stirling2(n,k) * binomial(k,2). %F A372624 a(n) = Sum_{k=0..n} binomial(n,k) * Stirling2(k,2) * A000587(n-k). %t A372624 nmax = 26; CoefficientList[Series[Exp[1 - Exp[x]] (Exp[x] - 1)^2/2, {x, 0, nmax}], x] Range[0, nmax]! %t A372624 Table[Sum[(-1)^k StirlingS2[n, k] Binomial[k, 2], {k, 0, n}], {n, 0, 26}] %Y A372624 Cf. A000217, A000225, A000587, A003128, A059606, A081047, A101851. %K A372624 sign %O A372624 0,5 %A A372624 _Ilya Gutkovskiy_, May 07 2024