OFFSET
0,3
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..250
FORMULA
Sum_{n>=0} a(n)*x^n/n!^2 = BesselJ(0,2*sqrt(log(1-x))).
MATHEMATICA
Table[n!*Sum[(-1)^(n - k)*StirlingS1[n, k]/k!, {k, 0, n}], {n, 0, 20}] (* Stefan Steinerberger, Nov 23 2007 *)
CoefficientList[Series[BesselJ[0, 2*Sqrt[Log[1-x]]], {x, 0, 20}], x] * Range[0, 20]!^2 (* Vaclav Kotesovec, Mar 02 2014 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Vladeta Jovovic, Jul 25 2006
EXTENSIONS
More terms from Stefan Steinerberger, Nov 23 2007
STATUS
approved