OFFSET
0,3
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..200
MATHEMATICA
Tanh[ Tanh[ x ]*Exp[ x ] ]
With[{nn = 50}, CoefficientList[Series[Tanh[Tanh[x]Exp[x]], {x, 0, nn}], x] Range[0, nn]!] (* Vincenzo Librandi, Apr 11 2014 *)
CROSSREFS
KEYWORD
sign
AUTHOR
STATUS
approved