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 A381023 #13 Feb 12 2025 16:46:07 %S A381023 0,0,0,0,1,15,160,1575,15659,163191,1809905,21474255,272757166, %T A381023 3703523824,53631736795,826097224680,13497286183354,233291225507890, %U A381023 4254733292942982,81680724157089634,1646873959921840191,34800264421134754997,769198023696181428250,17751664780107823096301 %N A381023 Expansion of e.g.f. log(1-x)^4 * exp(x) / 24. %F A381023 a(n) = Sum_{k=0..n} binomial(n,k) * |Stirling1(k,4)|. %t A381023 nmax=23; CoefficientList[Series[Log[1-x]^4*Exp[x]/24, {x, 0, nmax}], x]Range[0, nmax]! (* _Stefano Spezia_, Feb 12 2025 *) %o A381023 (PARI) a(n) = sum(k=0, n, binomial(n, k)*abs(stirling(k, 4, 1))); %Y A381023 Column k=4 of A094816. %Y A381023 Cf. A381025. %K A381023 nonn %O A381023 0,6 %A A381023 _Seiichi Manyama_, Feb 12 2025