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!)
A145087 Row 2 of square table A145085. 5
1, 1, 4, 31, 373, 6250, 136711, 3740137, 124143598, 4887140221, 224203589593, 11819532185476, 707883494843341, 47708648339054629, 3589347850731252292, 299381557667730507907, 27518788652896695773041 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,3
COMMENTS
Let S(n,x) be the e.g.f. of row n of square table A145085, then the e.g.f.s satisfy: S(n,x) = exp( Integral S(n+1,x)^(n+1) dx ) for n>=0.
LINKS
FORMULA
E.g.f.: A(x) = S(2,x) = exp( Integral S(3,x)^3 dx ) where S(n,x) is the e.g.f. of row n of square table A145085.
E.g.f.: A(x) = R(2,x)^(1/2) = exp( Integral R(3,x) dx ) where R(2,x) = e.g.f. of A145082 and R(3,x) = e.g.f. of A145083.
PROG
(PARI) {a(n)=local(A=vector(n+3, j, 1+j*x)); for(i=0, n+2, for(j=0, n, m=n+2-j; A[m]=exp(m*intformal(A[m+1]+x*O(x^n))))); n!*polcoeff(A[2]^(1/2), n, x)}
(PARI) {a(n)=local(A=vector(n+3, j, 1+j*x)); for(i=0, n+2, for(j=0, n, m=n+2-j; A[m]=exp(intformal(A[m+1]^(m+1)+x*O(x^n))))); n!*polcoeff(A[2], n, x)}
CROSSREFS
Sequence in context: A266757 A369737 A198865 * A215529 A351798 A005046
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Oct 01 2008
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 April 19 18:58 EDT 2024. Contains 371798 sequences. (Running on oeis4.)