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 A369752 #18 Mar 29 2024 19:10:14
%S A369752 1,-4,4,56,-104,-2464,1696,181184,462016,-17069824,-141580544,
%T A369752 1593913856,33015560704,-47193585664,-6973651011584,-50207289585664,
%U A369752 1214484253413376,25500259291480064,-72069247145590784,-8696105637665603584,-81680899029758541824
%N A369752 Expansion of e.g.f. exp(1 - (1+x)^4).
%F A369752 a(0) = 1; a(n) = -4 * (n-1)! * Sum_{k=1..min(4,n)} binomial(3,k-1) * a(n-k)/(n-k)!.
%F A369752 a(n) = Sum_{k=0..n} 4^k * Stirling1(n,k) * A000587(k).
%F A369752 D-finite with recurrence a(n) +4*a(n-1) +12*(n-1)*a(n-2) +12*(n-1)*(n-2)*a(n-3) +4*(n-1)*(n-2)*(n-3)*a(n-4)=0. - _R. J. Mathar_, Feb 02 2024
%t A369752 With[{nn=20},CoefficientList[Series[Exp[1-(1+x)^4],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Mar 29 2024 *)
%o A369752 (PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace(exp(1-(1+x)^4)))
%Y A369752 Column k=4 of A369738.
%Y A369752 Cf. A000587, A202824.
%K A369752 sign
%O A369752 0,2
%A A369752 _Seiichi Manyama_, Jan 30 2024