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 A186097 #5 Mar 30 2012 18:37:26 %S A186097 1,1,2,10,39,147,639,2857,12725,58081,270250,1268444,6009439,28736727, %T A186097 138401100,670641714,3268021317,16004012529,78716657052,388701645264, %U A186097 1926266491659,9576792342099,47753368809171,238759903786041 %N A186097 G.f. satisfies: A(x) = Sum_{n>=0} x^n*[Sum_{k=0..n} C(n,k)^3 *x^k* A(x)^k]. %F A186097 G.f. satisfies: %F A186097 (1) A(x) = Sum_{n>=0} x^(2n)*A(x)^n*[Sum_{k>=0} C(n+k,k)^3*x^k]. %F A186097 (2) A(x) = Sum_{n>=0} (3n)!/n!^3 * x^(3n)*A(x)^n/(1-x-x^2*A(x))^(3n+1). %e A186097 G.f.: A(x) = 1 + x + 2*x^2 + 10*x^3 + 39*x^4 + 147*x^5 + 639*x^6 +... %e A186097 where g.f. A(x) satisfies: %e A186097 * A(x) = 1 + x*(1 + x*A(x)) + x^2*(1 + 8*x*A(x) + x^2*A(x)^2) + x^3*(1 + 27*x*A(x) + 27*x^2*A(x)^2 + x^3*A(x)^3) + x^4*(1 + 64*x*A(x) + 216*x^2*A(x)^2 + 64*x^3*A(x)^3 + x^4*A(x)^4) +...; %o A186097 (PARI) {a(n)=local(A=1+x); for(i=1, n, A=sum(m=0, n, x^m*sum(k=0, m, binomial(m, k)^3*x^k*(A+x*O(x^n))^k))); polcoeff(A, n)} %o A186097 (PARI) {a(n)=local(A=1+x); for(i=1, n, A=sum(m=0, n\2, x^(2*m)*(A+x*O(x^n))^m*sum(k=0, n, binomial(m+k, k)^3*x^k))); polcoeff(A, n)} %o A186097 (PARI) {a(n)=local(A=1+x); for(i=1, n, A=sum(m=0, n\3,(3*m)!/m!^3*x^(3*m)*A^m/(1-x-x^2*A+x*O(x^n))^(3*m+1))); polcoeff(A, n)} %Y A186097 Cf. A181665, A183876, A181543. %K A186097 nonn %O A186097 0,3 %A A186097 _Paul D. Hanna_, Feb 12 2011