%I #6 Dec 08 2013 11:25:24
%S 1,0,0,3,0,-15,90,273,-2520,-375,126630,-269907,-7232940,44118165,
%T 525494970,-6182721087,-41497943760,965945373105,2901128941710,
%U -171088458444267,81569169583020,34527329266886445
%N E.g.f.: exp(sinh(x)-tanh(x))=1+3/3!*x^3-15/5!*x^5+90/6!*x^6+273/7!*x^7...
%t With[{nn=30},CoefficientList[Series[Exp[Sinh[x]-Tanh[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Dec 08 2013 *)
%K sign
%O 0,4
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Dec 08 2013
|