login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A203000 G.f. satisfies: A(x) = Sum_{n>=0} x^n * (A(x)^n + 1)^n. 7
1, 2, 6, 30, 198, 1526, 13014, 119454, 1161094, 11828966, 125456438, 1378837422, 15654724742, 183216332886, 2207257195798, 27347515306814, 348276224255878, 4557686850206662, 61280403794571894, 846507901281129550, 12013072624622078854, 175127895948991871542 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,2
LINKS
FORMULA
G.f. satisfies: A(x) = Sum_{n>=0} x^n * A(x)^(n^2)/(1 - x*A(x)^n)^(n+1).
EXAMPLE
G.f.: A(x) = 1 + 2*x + 6*x^2 + 30*x^3 + 198*x^4 + 1526*x^5 + 13014*x^6 +...
where the g.f. satisfies following series identity:
A(x) = 1 + (A(x)+1)*x + (A(x)^2+1)^2*x^2 + (A(x)^3+1)^3*x^3 + (A(x)^4+1)^4*x^4 +...
A(x) = 1/(1-x) + x*A(x)/(1-x*A(x))^2 + x^2*A(x)^4/(1-x*A(x)^2)^3 + x^3*A(x)^9/(1-x*A(x)^3)^4 + x^4*A(x)^16/(1-x*A(x)^4)^5 +...
PROG
(PARI) {a(n)=local(A=1+x); for(i=1, n, A=sum(k=0, n, A^(k^2)*x^k/(1-A^k*x+x*O(x^n))^(k+1) )); polcoeff(A, n)}
(PARI) {a(n)=local(A=1+x); for(i=1, n, A=sum(k=0, n, (A^k+1+x*O(x^n))^k*x^k)); polcoeff(A, n)}
CROSSREFS
Sequence in context: A373659 A078700 A176719 * A334317 A104561 A211211
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Dec 27 2011
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 25 08:17 EDT 2024. Contains 374586 sequences. (Running on oeis4.)