OFFSET
1,3
COMMENTS
If G(x) satisfies: [x^n] exp (n^2 * G(x) ) = n^2 * [x^(n-1)] exp( n^2 * G(x) ) for n>=1, then G(x) equals the o.g.f. of A300591.
LINKS
Paul D. Hanna, Table of n, a(n) for n = 1..200
PROG
(PARI) {a(n) = my(A=[1]); for(i=1, n+1, A=concat(A, 0); V=Vec(Ser(A)^((#A-1)^2)); A[#A] = ((#A-1)^2*V[#A-1] - V[#A])/(#A-1)^2 ); (1/n)*polcoeff( log(Ser(A)), n)}
for(n=1, 30, print1(a(n), ", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Mar 09 2018
STATUS
approved