cp's OEIS Frontend

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.

A052726 E.g.f. (1-sqrt(1-4*x-4*x^2))/ (2*(1+x)).

This page as a plain text file.
%I A052726 #18 Feb 15 2020 13:06:08
%S A052726 0,1,2,18,216,3720,81360,2172240,68423040,2484639360,102190636800,
%T A052726 4695453100800,238382331264000,13251891094041600,800600878273996800,
%U A052726 52229642780899584000,3659347096696811520000,274040260725697449984000
%N A052726 E.g.f. (1-sqrt(1-4*x-4*x^2))/ (2*(1+x)).
%H A052726 INRIA Algorithms Project, <a href="http://ecs.inria.fr/services/structure?nbr=682">Encyclopedia of Combinatorial Structures 682</a>
%F A052726 D-finite with recurrence: {a(1)=1, a(0)=0, a(2)=2, (-4*n^3-12*n^2-8*n)*a(n) +(-22*n-12-8*n^2)*a(n+1) +(-3*n-3)*a(n+2) +a(n+3) =0.
%F A052726 a(n) = n!*A052709(n). - _R. J. Mathar_, Oct 18 2013
%p A052726 spec := [S,{B=Prod(Z,C),S=Union(B,Z,C),C=Prod(S,S)},labeled]: seq(combstruct[count](spec,size=n), n=0..20);
%t A052726 With[{nn=20},CoefficientList[Series[(1-Sqrt[1-4x-4x^2])/(2(1+x)),{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Feb 15 2020 *)
%K A052726 easy,nonn
%O A052726 0,3
%A A052726 encyclopedia(AT)pommard.inria.fr, Jan 25 2000