login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Expansion of e.g.f.: tanh(log(1+x))*exp(x).
0

%I #12 Nov 26 2015 08:53:27

%S 0,1,1,0,4,-5,-9,196,-1280,4509,12565,-386144,3804516,-19339385,

%T -75459461,3162527460,-41545303904,276166431961,1385435722185,

%U -73547738586656,1207721984518180,-9917136571683789,-60806773846655969

%N Expansion of e.g.f.: tanh(log(1+x))*exp(x).

%t With[{nn=30},CoefficientList[Series[Tanh[Log[1+x]]*Exp[x],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Nov 26 2015 *)

%K sign,easy

%O 0,5

%A _R. H. Hardin_

%E Extended with signs by _Olivier GĂ©rard_, Mar 15 1997

%E Definition clarified and prior Mathematica program replaced by _Harvey P. Dale_, Nov 26 2015