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 A052622 #19 Jun 03 2022 18:33:58
%S A052622 1,2,8,60,576,6960,100800,1703520,32901120,714873600,17258572800,
%T A052622 458324697600,13277924352000,416724685977600,14084873439436800,
%U A052622 510058387238400000,19702238017093632000,808611973910028288000
%N A052622 E.g.f. (1-x^2)/(1-2x-x^2).
%H A052622 INRIA Algorithms Project, <a href="http://ecs.inria.fr/services/structure?nbr=568">Encyclopedia of Combinatorial Structures 568</a>
%F A052622 E.g.f.: (-1+x^2)/(-1+2*x+x^2)
%F A052622 Recurrence: {a(0)=1, a(1)=2, a(2)=8, (-2-n^2-3*n)*a(n) +(-4-2*n)*a(n+1) +a(n+2)=0}
%F A052622 Sum(-1/2*(-1+_alpha)*_alpha^(-1-n), _alpha=RootOf(-1+2*_Z+_Z^2))*n!
%F A052622 a(n) = n!*((1+sqrt(2))^n - (1-sqrt(2))^n)/sqrt(2). - _Vaclav Kotesovec_, Oct 05 2013
%F A052622 a(n)=n!*A052542(n). - _R. J. Mathar_, Jun 03 2022
%p A052622 spec := [S,{S=Sequence(Prod(Union(Z,Z),Sequence(Prod(Z,Z))))},labeled]: seq(combstruct[count](spec,size=n), n=0..20);
%t A052622 With[{nn=20},CoefficientList[Series[(1-x^2)/(1-2x-x^2),{x,0,nn}],x]Range[0,nn]!] (* _Harvey P. Dale_, Mar 04 2013 *)
%K A052622 easy,nonn
%O A052622 0,2
%A A052622 encyclopedia(AT)pommard.inria.fr, Jan 25 2000