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 A381021 #11 Feb 12 2025 16:54:03
%S A381021 0,0,1,6,29,145,814,5243,38618,321690,2995011,30840304,348114711,
%T A381021 4274888891,56744495872,809667333733,12358833406580,200955441549140,
%U A381021 3467781770502885,63298198354605210,1218507112218768721,24671782054230662277,524152965820457130290
%N A381021 Expansion of e.g.f. log(1-x)^2 * exp(x) / 2.
%F A381021 a(n) = Sum_{k=0..n} binomial(n,k) * |Stirling1(k,2)|.
%t A381021 nmax=22; CoefficientList[Series[Log[1-x]^2*Exp[x]/2,{x,0,nmax}],x]Range[0,nmax]! (* _Stefano Spezia_, Feb 12 2025 *)
%o A381021 (PARI) a(n) = sum(k=0, n, binomial(n, k)*abs(stirling(k, 2, 1)));
%Y A381021 Column k=2 of A094816.
%Y A381021 Cf. A073596.
%K A381021 nonn
%O A381021 0,4
%A A381021 _Seiichi Manyama_, Feb 12 2025