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.

A107095 G.f. satisfies: A(A(x)) = (1+x)^2*A(x).

This page as a plain text file.
%I A107095 #16 Jan 24 2025 18:27:30
%S A107095 0,1,2,-3,18,-150,1518,-17541,223782,-3087948,45470022,-707810715,
%T A107095 11569008816,-197540043324,3509923686678,-64697804055675,
%U A107095 1234127209128306,-24312707152663590,493834352052852738,-10327320248199824889,222086739445484152590
%N A107095 G.f. satisfies: A(A(x)) = (1+x)^2*A(x).
%F A107095 G.f.: A(x) = G(x)^2/x where G(x) is g.f. of A107096.
%F A107095 a(n) = T(n,1), where T(n,m)=sum(i=1..n-m, binomial(2*m,i)*T(n-i,m))-sum(k=m+1..n-1, T(n,k)*T(k,m)), n>m, T(n,n)=1. [_Vladimir Kruchinin_ May 03 2012]
%o A107095 (PARI) {a(n)=local(A,B,F);if(n<1,0,F=x+2*x^2+x*O(x^n);A=F; for(j=0,n, for(i=0,j,B=serreverse(A);A=(A+subst(B,x,A*(1+x)^2))/2); A=round(A));polcoeff(A,n,x))}
%o A107095 (Maxima) T(n,m):=if n=m then 1 else sum(binomial(2*m,i)*T(n-i,m),i,1,n-m)-sum(T(n,k)*T(k,m),k,m+1,n-1); makelist(T(n,1),n,0,10); /* _Vladimir Kruchinin_ May 03 2012 */
%Y A107095 Cf. A107096.
%K A107095 sign
%O A107095 0,3
%A A107095 _Paul D. Hanna_, May 12 2005