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 A052567 #20 Dec 14 2023 11:40:22 %S A052567 1,1,6,48,504,6600,103680,1900080,39795840,937681920,24548832000, %T A052567 706966444800,22210346188800,755916735974400,27706219904563200, %U A052567 1088037381150720000,45576301518139392000,2028445209752113152000,95589693062063456256000,4754884242802394308608000 %N A052567 E.g.f.: (1-x)^2/(1-3*x+x^2). %H A052567 INRIA Algorithms Project, <a href="http://ecs.inria.fr/services/structure?nbr=509">Encyclopedia of Combinatorial Structures 509</a> %F A052567 E.g.f.: (-1+x)^2/(1-3*x+x^2). %F A052567 Recurrence: {a(1)=1, a(0)=1, a(2)=6, (n^2+3*n+2)*a(n)+(-6-3*n)*a(n+1)+a(n+2)=0} %F A052567 Sum(-1/5*(3*_alpha-2)*_alpha^(-1-n), _alpha=RootOf(_Z^2-3*_Z+1))*n! %F A052567 a(n) = n! * Fibonacci(2*n) for n > 0. - _Ilya Gutkovskiy_, Jul 17 2021 %p A052567 spec := [S,{S=Sequence(Prod(Z,Sequence(Z),Sequence(Z)))},labeled]: seq(combstruct[count](spec,size=n), n=0..20); %t A052567 With[{nn=20},CoefficientList[Series[(1-x)^2/(1-3x+x^2),{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jul 06 2021 *) %Y A052567 Cf. A000142, A001906, A005443, A088305. %K A052567 easy,nonn %O A052567 0,3 %A A052567 encyclopedia(AT)pommard.inria.fr, Jan 25 2000