OFFSET
0,2
COMMENTS
Sum_{n>=0} a(n)/(2*n)! = exp(Pi^2/6) = 5.1806683178971...
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..224
EXAMPLE
E.g.f.: A(x) = 1 + 2*x^2/2! + 18*x^4/4! + 380*x^6/6! + 14980*x^8/8! +...
where
log(A(x)) = x^2 + x^4/4 + x^6/9 + x^8/16 + x^10/25 + x^12/36 + x^14/49 +...
MATHEMATICA
nmax=20; k=2; Table[(CoefficientList[Series[Exp[PolyLog[k, x^k]], {x, 0, k*nmax}], x] * Range[0, k*nmax]!)[[k*n-k+1]], {n, 1, nmax+1}] (* Vaclav Kotesovec, Jun 21 2015 *)
PROG
(PARI) {a(n)=(2*n)!*polcoeff(exp(sum(m=1, n, (x^m/m)^2)+x*O(x^(2*n))), 2*n)}
for(n=0, 20, print1(a(n), ", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Jun 19 2013
STATUS
approved