A013231 - OEIS

%I #6 Jan 09 2017 14:40:47

%S 1,0,0,0,3,-10,100,-525,5565,-40500,490950,-4581775,63536275,

%T -723857550,11365224000,-152882218125,2687668517625,-41677719265000,

%U 812130983706250,-14259432279850875,305288364810999375

%N Expansion of e.g.f.: cosh(log(x+1)-arcsin(x))=1+3/4!*x^4-10/5!*x^5+100/6!*x^6-525/7!*x^7...

%t With[{nn=20},CoefficientList[Series[Cosh[Log[x+1]-ArcSin[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jan 09 2017 *)

%K sign

%O 0,5

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

%E Definition clarified by _Harvey P. Dale_, Jan 09 2017