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 A381022 #13 Feb 12 2025 16:54:00 %S A381022 0,0,0,1,10,75,545,4179,34860,318926,3197210,34975061,415371726, %T A381022 5328246417,73470506291,1084206640399,17054915985752,284945098917980, %U A381022 5040033650314996,94099409345964169,1849525745917903666,38176559589575462327,825716052360614856485,18675737859143938658251 %N A381022 Expansion of e.g.f. -log(1-x)^3 * exp(x) / 6. %F A381022 a(n) = Sum_{k=0..n} binomial(n,k) * |Stirling1(k,3)|. %t A381022 nmax=23; CoefficientList[Series[-Log[1-x]^3*Exp[x]/6, {x, 0, nmax}], x]Range[0, nmax]! (* _Stefano Spezia_, Feb 12 2025 *) %o A381022 (PARI) a(n) = sum(k=0, n, binomial(n, k)*abs(stirling(k, 3, 1))); %Y A381022 Column k=3 of A094816. %Y A381022 Cf. A381024. %K A381022 nonn %O A381022 0,5 %A A381022 _Seiichi Manyama_, Feb 12 2025