A013215 - OEIS

%I #10 Aug 01 2018 22:06:03

%S 0,0,-1,3,-6,23,-135,1036,-8820,79253,-783405,8594146,-103172454,

%T 1341998591,-18791767995,281865510928,-4509653027880,76663767284201,

%U -1379952916274457,26219142105604030,-524382882377053690

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

%e -1/2!*x^2 + 3/3!*x^3 - 6/4!*x^4 + 23/5!*x^5 ...

%t With[{nn=20},Drop[CoefficientList[Series[Sinh[Log[x+1]-Sin[x]],{x,0,nn}], x]Range[0,nn]!,2]] (* _Harvey P. Dale_, Oct 17 2011 *)

%K sign

%O 0,4

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

%E a(0)=a(1)=0 inserted and title improved by _Sean A. Irvine_, Aug 01 2018