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 A088127 #12 Mar 24 2020 19:41:49
%S A088127 1,1,4,14,72,424,2960,23568,211456,2109056,23150592,277315840,
%T A088127 3599704064,50331030528,754122723328,12054165272576,204743835156480,
%U A088127 3682557441114112,69920454322356224,1397542619388248064,29331932133035081728,644973249444408197120
%N A088127 E.g.f. exp(-x)*cosh(x)/(1-x)^2.
%C A088127 A088127(n)+A037256(n)=(n+1)! Binomial transform is A088128.
%H A088127 Vincenzo Librandi, <a href="/A088127/b088127.txt">Table of n, a(n) for n = 0..200</a>
%F A088127 Recurrence: a(n) = 2*(n-1)*a(n-1) - (n-4)*(n-1)*a(n-2) - 2*(n-2)*(n-1)*a(n-3). - _Vaclav Kotesovec_, Oct 14 2012
%F A088127 a(n) ~ n!*n*(1+1/e^2)/2. - _Vaclav Kotesovec_, Oct 14 2012
%t A088127 Table[n!*SeriesCoefficient[E^(-x)*Cosh[x]/(1-x)^2,{x,0,n}],{n,0,20}] (* _Vaclav Kotesovec_, Oct 14 2012 *)
%t A088127 With[{nn=30},CoefficientList[Series[Exp[-x] Cosh[x]/(1-x)^2,{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Mar 24 2020 *)
%o A088127 (PARI) x='x+O('x^66); Vec(serlaplace(exp(-x)*cosh(x)/(1-x)^2)) \\ _Joerg Arndt_, May 10 2013
%K A088127 easy,nonn
%O A088127 0,3
%A A088127 _Paul Barry_, Sep 19 2003