login
Expansion of e.g.f. sinh(sinh(x) + log(x+1)).
1

%I #11 Jul 30 2018 03:36:16

%S 0,2,-1,11,-30,207,-1095,8304,-64372,589941,-5860125,64691794,

%T -775311174,10085421751,-141164863203,2117691780304,-33881891414760,

%U 576001188753673,-10367968207899897,196991835391515262

%N Expansion of e.g.f. sinh(sinh(x) + log(x+1)).

%H Muniru A Asiru, <a href="/A013019/b013019.txt">Table of n, a(n) for n = 0..100</a>

%e 2*x - 1/2!*x^2 + 11/3!*x^3 - 30/4!*x^4 + 207/5!*x^5 ...

%p seq(coeff(series(factorial(n)*sinh(sinh(x)+log(x+1)), x,n+1),x,n),n=0..20); # _Muniru A Asiru_, Jul 30 2018

%o (PARI) x = 'x + O('x^30); concat([0], Vec(serlaplace(sinh(sinh(x) + log(x+1))))) \\ _Michel Marcus_, Jul 30 2018

%K sign

%O 0,2

%A Patrick Demichel (patrick.demichel(AT)hp.com)

%E a(0)=0 inserted and title improved by _Sean A. Irvine_, Jul 30 2018