login
Expansion of e.g.f. sin(arcsinh(x) * log(x+1)).
1

%I #15 Jul 20 2018 03:11:46

%S 0,0,2,-3,4,-20,38,441,-4776,34056,-368838,5189085,-61808100,

%T 666424980,-8929309170,147346759665,-2283822093840,33140217608400,

%U -562702300383630,11332944235915965,-219113911766658060

%N Expansion of e.g.f. sin(arcsinh(x) * log(x+1)).

%H Vaclav Kotesovec, <a href="/A012573/b012573.txt">Table of n, a(n) for n = 0..96</a>

%e 2/2!*x^2 - 3/3!*x^3 + 4/4!*x^4 - 20/5!*x^5 ...

%t With[{nn=20},CoefficientList[Series[Sin[ArcSinh[x]Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Mar 13 2016 *)

%K sign

%O 0,3

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

%E Prepended missing a(0)=0 from _Vaclav Kotesovec_, Feb 03 2015

%E Inserted missing a(1)=0 and improved title from _Sean A. Irvine_, Jul 19 2018