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 A128326 #7 Dec 20 2014 22:24:40 %S A128326 1,1,3,12,57,305,1787,11269,75629,535960,3987913,31021693,251445581, %T A128326 2117993712,18499513147,167246537937,1562556275281,15066167302802, %U A128326 149737897716757,1532313152898208,16129331500727047 %N A128326 G.f.: A(x) = 1 + G(G(G(x))), where G(x) = x + x*G(G(x)) is the g.f. of A030266. %C A128326 Equals row 1 of table A128325. %F A128326 G.f. satisfies: A(x) = x/(1 - A( x/(1 - A(x)) )) when offset is taken to be 1. - _Paul D. Hanna_, Dec 20 2014 %o A128326 (PARI) {a(n)=local(A=1+x,B);for(i=0,n,A = 1 + x*A * subst(A,x,x*A+x*O(x^n))); B=A;B=subst(B,x,x*A+x*O(x^n));polcoeff(B,n)} %o A128326 for(n=0, 30, print1(a(n), ", ")) %o A128326 (PARI) {a(n)=local(A=1+x+x*O(x^n)); for(i=1, n, A = 1/subst(1-x*A, x, x/(1-x*A +x*O(x^n))) ); polcoeff(A, n)} %o A128326 for(n=0, 30, print1(a(n), ", ")) %Y A128326 Cf. A030266; A128325 (table), A128327 (row 2), A128328 (row 3), A128329 (main diagonal). %K A128326 nonn %O A128326 0,3 %A A128326 _Paul D. Hanna_, Mar 11 2007