OFFSET
0,3
EXAMPLE
E.g.f.: A(x) = 1 + x + 3*x^2/2! + 18*x^3/3! + 178*x^4/4! + 2565*x^5/5! +...
where
A(x) = 1 - log(1-sinh(x)) + log(1-sinh(x))*log(1-sinh(2*x))/2! - log(1-sinh(x))*log(1-sinh(2*x))*log(1-sinh(3*x))/3! + log(1-sinh(x))*log(1-sinh(2*x))*log(1-sinh(3*x))*log(1-sinh(4*x))/4! +...
PROG
(PARI) {a(n)=local(A=1+x); for(i=1, n, A=1+sum(m=1, n, prod(k=1, m, -log(1-sinh(k*x+x*O(x^n))))/m!)); n!*polcoeff(A, n)}
for(n=0, 20, print1(a(n), ", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Mar 28 2013
STATUS
approved